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eTNSERT,5R2®9  —__ es VENERUG V7. ee METR V75 
ei ea — IFF vV75"] V75 
*ARRLIMIT MaTa A V75 
eTNSERT,644 0000 SDERUG OTB TR v75 — 
+ ala IFT V7 Sw 4 V75 
wax GATN i V75 
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| 


gE cise 


tAkK 7 TirR 
_ RARRE TR 
KARR Tish 
RAK A TRE 
chen ds ae, ae 
wAx* CANT 
» INSERT, O80 
Awe | [FY 
Ak ate 
nA lip’ 
_ wA®  _ A? 
xAkW 
xAx 1 uALZ74 
wARGSY FQ! 
zAx| fat 
eo INSERT.9°? 
whe __JFF 
KAXVISELG MATA 
TNSERT,7Z%1 
eax TFT 
* As EZ0TN 
zAxR AP NaTA 
__RARRAP NATTA 
wAkKR SP MATA 
e£Axhk AP NATA 
__ *ARRTP MATA 
x*Ax| Con T 
eREPL ACFE, 89% 
_ Ox STAT 
zAr STAT 
e INSERT, 946 
xkAx aaa 


RAKDCHYR Nh +4 


ORV GLTE 
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VENER v7 
VIAN] a 
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VENFERUG V7A 
V75e} = 
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Venpayh oN 


AINRO PO LCON TP 
PINRN,NICONT.P 


V75<1 
2n,! ORF,0 


REPL ACFE ,984,98" 


ee T Ani AATA 

*eOe PATA 
zA* IF 1 

kAx GnTn 
wAkR a 
wAkn 

RAkt 

wAKTABI MATA 
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A,RRAL, ree 
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V75~e4 
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AARC ,07040 Gs 
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eet 1 . oF Oe el 
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VSNERUG V7* 
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eAxY CONT | V75 
5. ee 62 eee LA cn. — V75 
*At GNTN 2 V75 
kAXxTABL. DATA A,BR,0,9,0,0,65,7,9,9,9 V75 
Ae DATA 5 04 Oe P 0900547200000. XR,0,0 | V75 
*Ax2 CANT | . V75 


wAr 


te 3 


V7 50} 
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PAGE 9 OR/10/75 E2SOURCE YORTEX COMSY VSSNAP 0 1427 HNURS 
F aTNSERT, 1 VSSNAP V75 METR V75 
_WARVIS SET es | | _ V 
e (INSERT ,64 VSSNAP V7& METR V75 
*A*xBSO FOU MT +4 V75 
eAxTRIS EQU 2. ae —_ —— | V75 
zAnxTR75B ENQU 14 V75 
*A%xTB7 57 ENV : : V75 
“Ax IFT | V75e1 | | —— | V75 
* Ax GOT | V75 
tAx* TFST RT MACRO V75 
ee. os a | 7 _ | V 
wAw | LOA P(2),P(1) PTCK UP WORD CONTAINING V75 
kA w ANA BSOePr3) V75 
a At EMAC | V7 
kAk SAVE AND RESTORE V75 REG V75 
kAXSAVF7S Ma V75 
wAr S7T,3 P(1) | eS 5 a a a ee 
nA $T,4 P (2) V75 
whe ST,5 P(3) V75 
RAR ST,6 P (4) V75 
kA SY,7 P (5) V75 
Ax FMAC V75 
*eAxeLNAN7S vac | | V75 
At LO,3 P(1) V75 
nAw (0,4 P(?) V75 
war LDS P(3) v75 
nA Ll, 6 P(A) — V7§ 
aA Lb a? P (8) V75 
kAx EMAC V75 
nA CONT V75 
»REPLACF,90 | VSSNAP V75 MEIR V75 
aDe PASS 29, se%, SNBUF Ve _ 
wAx PASS 37, %e%, SNBI'F V75 
e TNSERT,99 VESNAP V75 METR V75 
nA iF V75=] V75 
 € Ae GNTNA 2 V7 5 
WARK TEST YF A V75 MACHINE ¥75 
kAt LMA TA75,% V75 FLAG TN TTOB V75 
kA x ANAT OADNOA V75 
: w At STAF V75FLG SFYT/RFEFSFT V75 FLAG V75 
kAx2 CONT | V75 
oe (NSERT,110 | VSSNA4P V75 | METR V75 


PAGE Jj QOR/10/7"5 E?SNURCF VARTEX COMSY_ VSSNAP | 2) 1477 KAURS 
eA GNTA V75 
wWAw = CESIFO 2 87 SF 3 ee 
kA® STAaF V75FLG V75 
KA sd COM T V75 
a INSERT,112 __ | : VESSNAP V75 | METR _ V75 
nA IFT V75-1 V78 
kA GTN | ? V75 
wAkKK SAVE V75 REGISTERS __ a ee V75 
wA* LMAF V75FLG V75 
ckAx JAZ EFE JMP JTF NOT V78 V75 
Ae _SAVF75 RS3P,R4P,RSP,ROPARIPO v75 
wAXEFE FQU * V75 
kAwd CONT : V75 
sg TNSERT, 198) —_ VSSNAP V75 __METR V75 | 
eAt IFT V75<] V75 
xA* GNTN a) V75 
wAwke ee _PRINT V75 RFGISTERS _ V75 
kA ® LMA V75FLG V75 
WA JAZ SN{? IMP IF NOT A V7S V75 
wAe LMXT OO SNRB nieces ___seas oe 
kA * Way RAP V75 
x Ax CALI CANV RS V75 
wAe inp RAP RA scnsiincinsntsisseesaircetsetinsesatonsseienia tt A Ucinnenrvinnis ansusnicutsnitanssmainan 
* At CALL CONV V75 : 
wAx LB R5P RS V75 
Ae ee 5 ee nn 2 
kAx LOB RAP RA V75 
xA® CALI CANV V75 
Ax ee ee ee ae ne ener nee nee ne V75 
xAx C4ALt CANV V75 
nA WRITE SNDCBR,PO,, 1 PRINT RFGOTSTERS KR3aR7 V75 
wWAkSN12 EQU fn ees te ns ee V75 
eAxe5 CANT } }} | V75 
ePESLALCF,141,142 VSSnNaP NO SMR 4/21/75 KERNS Eee 
w() TFT VOR TE Xe? sepeiedererietect es ees. a 
~~ *De £4G07TR £#3SNDP —— y2 
nA TFT VORTEXe{ GO TT? « TR VORTEX ITI E.?2? 
kA* GTN { | | | _F.2 
ay ee 2, ~—  FTANB LACATTON 0 SE LO 
xAx ANAT AYF7VI7O SET TH HiimMP ANIINDARY foe 
aA% STA SNAPA SFT START NUMP ANDR | Fee __ _ 
kAx FONT) ——eeeeia i 
x Aw LP Y V75—1 V75. 
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5 wAk GOTOH SN1335 V75 
a Oa NT el ene ee ee as IE eccciecsenscecesnensnnsienntentensinentensiiatiiampslasaeaniii 
eA® JA? §N133 V75 
*A* I pa SNAPA V75 | 
RU i ceca ge ec ice 
aA® JMP SNt44 v75 . 
| RAKSNISS FA V75 
PS TNSERT. 144 0 SNAP 7S _ MEIR OWS 
RARSNY 44 Flt i V75 
: eREPLACF,147 V$SNAP NN SMR 94/21/75 KERNS F.? 
: eDeSN2 CUNT. sha etaciesstiunnentneaiis ee 
: aREPLACE,149 VSSNAP SMR = 04/28/75 KERNS E,2 
wD WRITE SNOMP,10,0,1 NUTPUT OIIMP HEADER c 
___ eg tNSERTSL9G6 CCN SMRe 04/28/75 KERNS €—,2 
nAn WRITE SNOMP,10,0, 1 NuUTPUT OMP HEADER Fo? 
oe INSERT, 245 VESNAP V7" METR V75 
: _ was. PT NN — oc cisaitejatacnis ater icbensetisinamtiiainiaeanaansani ee ei 
! kAx GOATN q V75 
| kA SNR [VATA ' ' V78 
RAXSNRS ATA Ft ee ene ana ae ane ere ere een V75 ee aera ery ere 
RASNR4)=6DATA RA V75 
*AxSNKS HATA ' ' RS V75 
— wARSNRA DATA Of RA NG 
WAKSNRF DATA ' ' RI V75 | 
wAx6 CANT , V75 
eg INSEPT, 268 CC SNAP IS __...__ . METR 5 ee nee 
wAr I FF V75=4 V75 
KAeSNDERR fo 24,SNR,% V75 
ven DNSER Tp 20 8 ccc —VBSNAP OO UVZR METER V75 eee 
aA IFT V7 5-1 V75 | 
x Ax GNTN 7 V75 
kAKKSP OATA OF RS ee re ee ee aan ee Leeann en 
—yAeR4P SO orDATAOCi‘i RA V78 
KARR SP DATA Q RS V75 
WO NN i ie ee 2 2; ee 
“eAeRIP => ATA OD R7 V75 
RAKV7S5SFLG UATA 0 V75 FLAG, 1 MEANS V75 MACHINE V7 5 
xAw7 CONT ee Soe V75 sonst i teat pu ncn 
P 
~ - Ree a Renae snes a aes rei nmi nmi ASA ERLE LA AAO OO ee 


ee 
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WM AGE. 2. OR/IO/IS  EPSOURCE 
eREPILACE,S F.2 
_— *#DemR eee ee RELEASEN 03/0 4 _ 
wAxe E.2 
oREPLACE,R3S F.2 
*DxFASCMR GEN ANC FASCMA),10(81 K) 25 (POPDF .83,5(0) ,6(0),AA : 
*kAxFASCMB GEN /PCFASCHASP),LO(STACK), 28(POPDEL),LBS, 5(0),6(0), AAA E,? 
ePEPLACFE,928 E.2 
«De P4(R7), 12 (ASSPFC) ,22 (ANNE) an 
aA C24(K9),12(ASSPFC), 92 (ANNE) E.2 
REPL ACF,925 F.2 
*eDePFORTS! CEN Ju, 1LO(NFS@a | SGPR) 24 (F | 
cAxFORTS 1 GEN /*,LO(FSALUY,12CASGPR), ITT Tacrnead, TTT E,? 
REPLACE,940 F.?2 
_ *#D*e 2 (ASGPR) (7) —— 
x At CI2CAEGPRI,2P4°RQ) E,2 
eFPEPLACE, 942 E.? 
kDaFNRT $4 GEN : | _—— 
tARFORTS4 GEN “INC FORTS7) »pLOCTFSP), 12(ASGPR), 24(R9). 14(INCAY, E.2 
oREPLACFE,1082 F.2 
*DaFORTS7. GEN | O4(R7) ,LA(TRNAI, | 
*AxFORTS? GEN JP SS3M), 1O(TFSP), {2 CAEGPRI, 94(R9O),L4(TRNAI, F,2? 
eREPLACF,1138 E,2 
*DeVORTIZ GEN  /NEVARTIB) {9 CASGPR) ,24(R4),14°DECA) | _ | 
kAxVORTL7 GEN AN(VARTIB),L2ACASGPR),24(R4),94(DECA), E.2 
eA* CIOCWAITMD) 6 (SPEC) E.2 
REP] ACF, 1482 — | =e 
De C11 BESPEC),17(GPRDIITY,24(R7), PTR TN 'P!', TEST FOR 
nA eee I7CGPROUTI,2a RN), PTR IN 'P!, TEST E.? 
8 id Bo a. | ee: i 
#DeMCTOS GEN ANOMCTASYX) ,LOCNSSALUD , 6 (MEMC),24(°R7),13 (CP 0UT) 
2AxMCTS GEN AN(METOSYX) ,LOCNSSALUD , AC MEMC), 24°RD), L3SCPOUTS E.2 
_eREPLACF,1276 _ a a Le en, em ee a eRe ee ee Ee E * 2 
at * CIEFR7)V,11 (LIT), MKFFFO,14(A9NDS,13(PNUT) 
Ax CIARA, LICLIT)  MKFFFCO,14 (AND, 130 PRUT) ca? 
eREPLACE,1345,1347 _ E.? 


eS Oe ee ee ee ee 


ee 
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Dee RESTORE P FROM R7 AND RETURN | 
*DeMAS?24 CEN JNESSIM),7OP IMPS), 1OCIFSALU),GCMEMCS),L12CASGPR) ,240(R7), 
Oe CN ATTINEAD, L6(CRVY1I)D ALS CPOUT) ete Seniesa cans aicieaeeeieensetees 
*Ak RESTNRFEF P FROM RG AND RETLRN E22 
*AkMASIO4 GEN JPFSS2M),1N(PIMPY,L2CASGPR) ,24(7R9) ,LACTRNAI,IS(LAG), E,.2 
Ar CISCPMUT) E.2 
SREPLACFE,1456,1457 On 


wf) & & SAVE P IN &7 


ne — ee oe ea ee ee ee ee 


E.2 


tI. 
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*DwMBS GEN JNCMBS1),12CASP) 14 (TRNAD,I5S(L 0G), 17 (GPROUT) .24(R7) 


I a NP i a 
*AkMAS GEN JN(MAS1),12( ASP) 14 (TRNAI,15(LNG),17(GPRNUT),24(RO? F.2 | 


a eS 
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‘ARE 4 9A/12/758 EASAURCEF vVARTEX CNMSY MICSTI™ AS 826 HOALIRS 
~YNSEOT, 48 F 
Aw MAME MMEFM, EME M F 
__'AwMMEM =RSS 200 MATN MEMORY ry nck F 
AwEMEM RES A ENN OF MAIN MEMORY € 
Ax BER MATA 120940 GENERAL USAGE RUFFER F 
Ake F 
‘Awe NATFeeTHIS SECTION WILL BE AVERLAYED RY THE BUFFER RUFR Fe 
Aer ) c 
_ atNSERT, 191 _— es MICSIM NO §MR 01/21/75 KERNS F 
Aw RSS 1{214RUFRee FrIL OUT TO MAKE {20 WOURR RUFR SPACE F 
ePEPLACFE,118 MICSYM NO SMR 04/21/75 KERNS rs 
OwSNHliF ASS 248 ____fONTROL STARE PAGE __ 8s 
‘At FyT SORE CONTROL STARE PAGE 0 F 
oPEPL ACE, 124,126 MICSTM Nf SMR 01/21/75 KERNS e 
_ De SORHY ASS 16 HC8 a} ee eres & 
NefORMD ASS 16 ACS #2 s 
‘De ASS 96 MCS FOR PAGES 1,2,3 g 
At — FXT SOR _____CNECOMER STARE F PAGE 0 DECNOF $  __ F 
At FX T SDRMP NECNNER STARE PAGE 0 NECARF 2 F 
‘At Fy T @ORM1B,8NRM1C, SDRMIN € 
7 REPLACFE,134,135 —__ MICSIM NO SMR 1/21/75 KERNS | F 
HeBHER Rava AL9N24N a 
Oe RS& {20 § 
gg PEPLACF,155__ __MIf- Sts NO SMR 01/21/75 KERNS F 
“Ne CRUF BS8 aio ~ RUPPFER T9 HOLD COUNTS FoR NUMBER OF TIMES § 
,» TNSERT, 140 MIfSTM SMRe 94/21/75 KEPNS F.2 
 AwPPAG MATA 0 ; ee ae E,2 
~TNSERT, 389 MIC STM Nf SMR- 01/25/75 KERNS F 
Aw NATA 0332 7 ZFRA TARLES F 
sg TNSERT, 374 MIP STM UNO SMR 91/25/75 KERNS F 
Ae PATA Fxcs 7 ZERN TARLES) F 
» (NSERT,377 MICSTM NO SMR A1/27/75 KERNS e 
Ae NAME Fxe | | _ F 
REPLACE, 384,384 — ~ WTFSTM NG SMR £AY7D5/7S KERNS F 
Dt ImPM SAR HONSEKEEP TARLES 8 
‘Nw NATA COMMeSTEP WORD CNUNTSICLEAR a Fans STEP FA COM C 
Dw COAT RTE RU TART ADARFSS oo C 
e TNSERT, 432 MITC STM SMRe 01/21/75 KERNS FE 
AWENETA PALL SIMUT,7,FXCS REQUEST MEMORY TYPE F 
ay: PALL ee RET MEMORY Ty PRE 
‘Ae IMP Mm PETC - 
‘Ak R | iB I APKH Fe 
ee ees As SS Sy rea A ti ipso epi ek ohne lea gpm mich nme mcs ue mp lebih ™n encr rcnhnc -lpipneim rlees—ala i bmnehs=bpihcshig| wnpihiogin ing is 
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‘AGE | R OR/I12/78 EPSNURCFE VARTEXK CNMSY MYCSI™ 03 826 HNAURS 
ry © ne \)) 5 Ge, SO 
Aw JAN Fxc ya (TY 2 NOT VALTO F 
‘Ate SuRT 3 F 
ry \ an | \ a 2 1. ns a. oT nee saan em 
At STR “TYP SAVE MEMORY TYPE e 
‘AXEYCS F (yt * ro 
SET (En + 7 I A 
‘Aw JMPM SAR 7ZERQ ALL TABLES AND FLAGS F 
Aw MATA COMMmey WORD CAHUNT F 
eT ee 1 ‘a es \ 0, - 0  | ) ~ 
‘At NECR A4 F 
Aw STA PR SEY R5 TN ALL 1"S FOR 620 EMIILATION | E 2 
INSERT, 4386 | MICSTM sia ~ @4721/75 KERNS F 
ASEXCS NaTA ' MEMARY TYPE?! F 
sah NATA 0 MEMORY TYPE, 328C, 4eCORE,SeSLOY CORE F | i 
— CF2T,491 . ......©6©6FA8TM 0 6BMRe an  ___—* pees 
ret STAE PRA Eee 
_. .... gPEPLACE, 500,802 ___ MICSTM Oo SMRe 9/29/75 KERNS | UF 
De DNATA $NRMI432 PAGE 1 0cS | § 
11 we MATA CORMI+h4 PAGE 2 DCS $ 
‘De MATA $RM1 +496 PAGE 3 prs 8 
‘Ae +#ATA £PRMTR ... . °£4z;»PAGE 1 OTS  ..©@©)©»@™©@®Y—a< a F 
‘At NATA SORMIC PAGE 2 OCS F 
‘Aw Nava GNRMIN «PAGE 3 NCS L F 
,RPEPLACFE,848  &.*SFSTM NO SMR 04725/75 KERNS F 
‘De Fall SINT, 21,FA6% NUTPIT THE REQUEST & 
tae ALL SS IMUT, 7, PAGS  ALUITPUT REQUEST eae teen - 
REPLACE, 579 ~MTCSTM NG SMR 01728775 KERNS 
NePAGS NATA ' JNPHUT HIGHEST NIIMRER WCS PAGE DFSIREN ' Ss 
__ thwPbGS NATTA =f OO POGF VIMIT? FO 
~ INSERT, 634 | MICSTM SMR eo 04/21/75 KERNS E,2 
‘Ae LOA FxLIM FXFCLUTTON LIMIT E,? 
At QTA PONT RESET RUN CONT | | E,2. 
aT ae “ThA a ee maaan Bar o ot ene ee ee ene ae RE RN Ae RR AR na ER EE RNR AN RNA An Ame em F 5 ° | | 
Aw STA PPAG SET CURRENT MICRN PAGE F.? 
__.. oPEPLACE , 642 _  MIESTM SMR 94/21/75 KERNS E42 __ | is 
ary Cale $190 “@HECK FOR 80M HALT ANDRESS - a: | ) 
~PEPLACFE, 646,653 MIC ISé™ SMRe 04/21/75 KERNS F 
(Dew CHECK IF PEQUTRED TO WATT ON MEMORY UU 8 
res VFS IF SaNRIMCo RENO) 8 
MeS129 [OA ¥S,1 Sat ? s 
Oe Ja? aoa § 
wir: MP BL AS.”™”~”CCONG NOW APE - 8 


MAGE RK OR /12/78 FASNuRCk VARTEXY CNMSY MICSI™ A$ 827 HHURS 


ee INNIS ea ee EE eee eee 


we IDA ¥YIMC,{ | s | | 
tD* NAR Glen Telelos| $ 
ye 1A? S107 VESwWATT | | ee s | | 
~YNSFe@T, 689 MIT SYM NO SMR 94/21/75 KERNS F.,2 
rAw LDA CPAG NEYT MICRO PAGE F.2 
gat STA  —_— PPAG SET CURRENT PAGE TM NEXT PAGE E,? __ 
REPLACE, 662,664 MIC ISM SMRo 01721/75 KERNS F 
1D#S8107: CALL MIP A MEMORY OPERATIONS 8 
10 CALL 8300 MATA LOOP PROCESSING 8 — ee 
Oe JMP 818 § 
eo TNSERT,670 MICSTM SMRe 94/21/75 KERNS F.? 
Ae ‘883 Fxe(O RETUQN T9 FXFC IF ABART RUN SET E,? 
tAe CALL $120 CHECK FOR ROM Waly anpR F .? 
eREPLACF,721,725 MICSIM NQ SMR A3/23/75 KERNS e 
rDe LDA __MOPC,1 a 
Tr JaZ 8908 TE NO MEM REN N.! 
Oe TaYX s 
ee |. | een A |: 81 0 ee 
bAn J87 S205 TF NAY MEM REA 
vA TAX | 
_ REPLACE,727,729 | _|_§=« MIFSTM S8MRe 94/21/75 KERNS 
ew “Lov ~CPAG 
re | NAE TRACE, TRACF FLAG FOR PAGF 
De TA? S201 ______ SUMP_IF NOT TRACE MONE | 
ePEPLACF,749 MICSYM NO SMR 11/23/74 
tO MALL 1ONUT,9,5219 MUTPUT TA LO 
tae PALL Lt  LonuT, 9, 8219 AUTPUT TU LO | 
~PEPL ACE, 767,779 MIN STM Nf §MR 04/21/75 
bide LDA NRAM, INCREMENT FXECIT TON 
De DPT BUF COUNT FOR | eerie ieee 
ew TAB THIS 
ee TNR 0,2 CONTROL 8OM WORD, 
REPL ACE,AO% MICSTM NO SMR 12/18/74 KERNS FF 
De ~ IMP FRAG a] 5: re ee 
wAr TMP CRAY YES FF 
ePEPLACF, R30 | MIfCsSY™ NO SMR 11/723/74 KERNS FF a | 
a it IMP FRAP —— | s | 
nAr IMP PRAB Nile PF 
~PEPLACFE, AGF MICST™ NM SMR 11/29/74 KERNS FF 
ae — SANT USE ‘TS FIFLA FOR RaNFFSFT IF T/P REQUEST (Tefesjy — i 
kAw IMP PRATZ TF S34 NR O THEN USE TS FOR AFFEFSFT & 
cAke PAN'T USE TS FIFLA FUR ReMFFSFT TF T/M REQUEST CIMSE/F) FF 


INSERT, 847 7 MEST OND SMR TT 75794 KERNS 
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NS A SS SS, EE i a a a Se 


wAn SUPT {4 FF 
a At SA? CRAB MBE ; FP | | - 
wAk NAR TMeF | FR ; - 
eREPLACE,10904,10907 MICSt™ NO SMR 12/18/74 KERNS FF 
eD STA __ CPAG | RRANCH PAGE a S 
Oe LOA PAGA PAGE LYMYT | 
“Oe SUR Cf PAG § 
ae . JAP eA | ___ LEGAL JMIIP  § : 
wAt FALL 8 8©=©—SO PGK  -RAHFCK TF LEGAL PAGE a a 
whe SAN >A YFS FF | 
_ ssid REPLACE,1418,1429 — MIF STM  SMPe na/t1/75 KERNS OF QQO 
ats LOB TRACE 8 
Ow LDA 1,9 © TRACE FLAG ON ? s 
«De JA7®  CRYA  _(NMmEWTT oe s 
vy" ~ JHPM = TREETA CHECK YF WITHIN TRACE BNUNKS EF,? 
whe JAN«® FRYA RFTIIRN TF NOT TO TRACE F.? 
—. gREPLACF,1494,149R i  _—_—_— MIFSTM SMRe AAAI /75 KERNS Fy? 
*D*S$308 LOR CPAG CURRENT PAGE C,i 
at) LOAE TRACF,? TRACE FLAG FOR PAGF Ci 
ae IAT % $300. JUMP ITF NOT TRACE MONE a s 
ASTROS BO F.? 
eREPLACFE,1653,185% MICSIM CMRe N4/21/75 KERNS F.2 
eOe 108 7 epaG a TEER 
aOe LOAE = - YRACE,? TRACE FLAG FOR PAGE AN ? D 
aXe — 1 YMYX NOeEXTT § 
_ sg REPLACE,2160 = == CUMS SMR 4488/75) KERNS FPO 
ki ai — ¥026 S 
«Ae STR YCTN,1 CLEAR CIN IF NOT TO RE SFT F.° 
ee Ee, ee E 9? 
~YNSFRT, 256% MICSIM NO SMR 04/21/75 KERNS E,? | 
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*AeMCTONS GEN ANIME TOSY) ,SOCMSSALU) ,BCMEMC),24°R9) oe 1 SCPOUTS F,2 
eREPLACE, 659 FPPWES PARKER E.? 
_  #NeMRS20 GEN /N(MRS891), 107 OFSP),60MEMC), 11 (RASSPFC),P3SCOLZF), 
 wheMB§20 GEN JN(MPSALI,10(OFSP) ,6(MEMC), 11 (RSSPFC), 23 (ORL F.2 
ePEPL ACFE, 896,698 FPPWCSs FRITCHMFF E,9? 
# () wm PESTORFE P FROM RF AND RETURN | 
 #OeMAS24 REN  J/N(8S3M),7°PIMPSI,1OCTFSALII) ,OCMEMTS), 1 20AGGPR) ,24°R7), ©. 
«De CIACINCA), LACE RVIY, 1S CPNUT) 
_ __ when __ RESTORE P FRAM RO ANA RETURN _ Fe 
thxMRS24 GEN AP(SS2@),10(P IMP), 12 CASGPRI,24(RO),14(TRNAI,I5(°LOGI, EF? 
«Aw CrsePanurs E,? 
REPLACE,798 _ «FP PWS | _ | FRITCHNFF £€.2 | __ 
*OeMRS GEN IN(MAG1), 129CASP), L4CTRNAD CS CLAG),17(GPROUT),24(R7) : 
nAwy SAVE P IK RQ F,? 
zAaMhPSs REN JN(MAS1) ,12( ASP) ,L4(TRNAD ,15(LAG) ,17(GPRNUT),24(R9) £€,2 | , 
» INSERT, 890 FPPWES PARKER F,2 
wan FJEC —.2 
ew AaPAGE FQt! Y190N _ PAGE NUMBER _—— $y E.2 _ ee | 
eAgn | F.? 
chee RCS ENTRY POTATS F.? 
wAwn a ee _ E.? | 
*Ans . e.? 
zAwn FNTRY POINT FOR STACKeJIMPS AND JUMP YE 20, F.? 
wAew = SAMPILES A PEG FOR NSF RY CANDITIANAL JIIMP, es eae 
w Awe F.2 
nAw Nae yvtqs E,? 
w#Ae REN JFCSTKISD FSA, PCL) LPCASEPR) ,2A4CROV,IAPTRNA) , L5CLNG), Fee 
* Awe CTFA,SFO,7(SSALILI) E.2 
wAke E,2 
nAwn BCS FNTRY POTANTS FOR RFLATYONAL/LOGICAL ROUTINES E.2 
— w#Aee FLAG GUNS SET AR RESFT TA FLAG WHICH ENTRY W4S TAKEN,  F,B 
cAne F.2 
wit ARG v't4 a | £22 
— wASTFRE GEN /NCRELI), 19 (ASSPFC),22(A7ERO),L40TRNA) ,ISCL06), Fi, 
wAt CwF,,8C9 F,2 
wan NRG ¥NG6 E,2 
~ wWAnJIR¢ GEN  —— SNFREL ID, 1ACASSPFEY ,SO(AQNFS) ,14°TRNA),15S(L06), -F,2 
wAw CwrF.,§C9 e's 
ck Akt F,2 


sina ACT ENTRY © CHADSE BFTWEFN 8001 END MATH/SORT7INDEX, ro 


a thd So ee a I cH meni mm 
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a hen _—— ee as 7 
w Ae ARG v'47 E,2 
_ wae GEN OSFOSMOTNID FSR,2CI) 
kAne F.2 
kak RCS FNTRY POTNT e& ANNUAL E whRA INTEGER ADN anf SURTRACT F.? 
_ wAwe  REGIN FETCH MF SFCMND OPFRAND 0 
Awe P.? 
whe | ARF 4E F.? 
kmAe = GEN ANCTARY),LOCMFRMTRE ACMEMC§ 
naw FIFC F.? 
tAnn E.2 
Oe.) ee UAE A 2 4 2, ener, a ae 
nha F.? 
aA ARG Y'F6 ew 3 
then FIFLN SELECT ENTRY POINT FAR STARK JIIMPS F.? 
xAwnee (THIS MTARM MIST BEF AN AN FVFN MYCRO ADDR) PF .? 
eAwn F.2 
aban START FETCH MF STACK POINTER F.2 
Ane nici ossteac tt taco ese toi oun cite spiced ine tsa epamaelctassicemnosieeinsinasealte spriisaicctessics a tanparaeaeanseccicuasescae 
eAaSTKS{ GEN INO STK IDV, FOFESALII) ,6(MEMC) ,19CASRPR),24(R19, F.2 | 
wAn CI4PTRNAL, LACLOG) E.2 
pW. eee ee a — 
ahew JUMP TF A REGISTER GREATER THAN ZERO F,2 
thaw E,? 
— sAee CALLING SEQUFNCES 
nAkn Fiat 
Aw x PATA 0105195 E,? 
P.O ed ae? a nee <a 
aAnt E,? 
wAane Fee 
_wAeae TEST IF RO WAS NFGATIVES ITF SO, A NOT >O SN JiIMP TA EXIT | Ps 
tAnan (THIS MICRA MIST FOLLOW STKSI) es | 
wAkiks Ree 
whe JAG! = REN ATE SAGI, TAGHY ,SCFTY,7 (ALIS). F 2 
ree oo i cn 2 * le 
shan TEST IF RN WAS ZEFRA TF 80, A NNT 26 SA JUMP TN EXTT E.? 
cAwn F.2 
whAwJAGD? REN S/T YJAGS,TAGHD,SCFTY,7CALIIZ)  ...©)»©@® vO 2 
eAnunae F.2 
ahene A REF TS > 8M FFICH INSTRUCTION AT JUMP ANDRy Ese 
where YF ANDR WAS TNA, FETCH EFFECTIVE AND Rp 0 "F 2 


PAGE B® AR/12/75 EPSNURPCFE VORTEX EOMSY FPPWCS ere) 993 HNURS 
vvTT “fTHIS MICRA MUST BE ON AN FVEN LACATTON) E,?2 
eAkan F,? . 
wAw ARG = ae ef ae _ «Eg —_ | | 
zkAnx JAG REN INO JAGA) -LOCTES&MIRY ,S(MEMC)Y F.2 
then F.? 
w#Awe | TEST IF AOAR WAS INDTRECTS TF $0, RACK TM FETCH AGAIN © F,2 | 
shen ALSO, SEY NEW P VALUF, F.2 
sAwn ARG wa? F,2 
 wAeTAGA GEN ——/TJAGS, JAGID ,SCFTI, 70M ee ene E,2 | ee _ 
i 7) \ CIL(BRSPECT),AN(MIR), 1407 2ISCLAG), LSCPNUT) F,? 
xnAwn E.? 
__ whew ss PONTINUE RESTART OF PIPELINE AT JUMP AMDRp | Fy? 
eAwe FXTY TA ROM, F.2 
eAnkt F.2 
aA® ARG a+ —_ a 
 wAwJAGS GEN /P(SS3M),7(P IMPS), TFO,1LSCINCP) ,LOCTFSP) ,S(MEMCS) © F,? 
cA www . Ee? 
ow Aeee FXTT TA NEYT INSTRUCTIAN IN SEQUENCES NO JuMPs A NAT > O, __F,2 
rhane “(THIS MICRO MUST BE FVEN) E,2 
wAnne EF, 
___ wAwJAGR REN  ——/PCS82M),7FPIMPS), TFO,LSCINCP) LOC TFSP),A(MEMCS) = Eg? 
eAn FJEC F.2 
x Aa te F,? 
__wtAwe  _REFNTRANT SURRMUTING CALL/ZRETURN Fe? 
aha | | F.? 
rAR* RPETUPN APNRESS IS SAVER ON STACK F,2 
t Awe nec pep ie i ti senapaaninait _ 
gw Aewe)——”:C«O YY OCR ORER) CONTAYNG ANMPRESS NF STACK PNINTER F.2 
sAwe E,? 
thee SAMPLE MICRO FLOWER oa _ _ 
c Aww MYR PSHJMP ¢ STKIN, STK12,STKIS,PSHI1, J1,PSHIS,PSHI3 — ane 3 
Awe TN! PSHJMP 3 STK Spee oSTKIS»PSHII, PSHJ2,P8HI4,PSHIS, E.2 
wAws iceman pepo PSHIS pay Bap ee 71 ee 
wane ~ PNP IMP s STKI{,STKI2Z,STKIS,PNPI1,PAPJO, PAP IS F.2 
nAkn | F,e2 
eA te CALLING SEQUENCES oe a _E,2 — 
sAen 8} }©= —_ ——- — F.? | 
shen PSHJIMP? MATA 9405925 F,2 
cAww NATTA (JUMP ANDAR E.?2 
—---25 oS spacccas serncaci Le sA NL, bichel eR, en a Fe 
rhe POPJIMP: MATA AiNn8N6% Fe? 
tAke | | F.2 
ee aac icodkune sean seclusion atc acteste gisele —— 


ee ee 


PAGE & OR/IZP/FR EFEASNIUIRCE \VARTEY CNMSY FPPWECS AO ON3 HNMLRS 
ver aeamaRe TT ger) t's) a ae TOR eS Ce eee encom seinsiesbeentisieediacioies 
eA ew ALSO SAMPLF TYS SIGN AND INCR P REG, E,? 
__._ wae ee ee eT ee ee ee ae ne a ee _. £2 
— eARSTKID GE IN(STKISV, TI (RESPEC), 23(MIR),14(TRNA) ,5SPLAGY, | a. Se : 
h At CI7T(GPROUT), PACPEY,7CSSALIID,L3CINOP) t,2 
what re eee F,? 
nAre INTTTATE STORE OF NEW STACK POINTERS © rn ee - as 
Ak ALSNM FTEID SFLFCT YN DFECTOF TF PSHJMP NR PNP IMP, F.2 
_.. WAwe® a eiediistincs ese aac sea iusscenlteg scnainscaespctee theses atest os ater ceecoes | E,2 | | 
—wARSTKIS REN S/FEPSHI19,FS9O,9(719)9,19(9SSAl UI,R(MEMC), - FA? — 
aA CIPSCARGPRY,24fR1),14(°TRNAD,15°7L NG) rae 
Aa ee sn lea cos het Mi tetas EF .? 
Ake PROVIDE HIPAATEM STACK POINTER FOR STOREY BO FE 
shuns TNYTTTATE STORE OF PETURN ANNRESS OW STACK, Fe 
kak ke (THTS MTERN ANDNR MUST RE EVEN ANA POPS MUST FALL OW PSHJ1) © E,? | | 
aay al ' eS ase Wine oe ean Se ee AOR EO SE TESS! HN gm 
«Aw ARE > { F,? 
eAwPSHIY GEM ANCPSHTPY ,AOFNSHALII) ,ACMFMC) ,11 (RESPEC, | A3CMIRA, _ £6? ee 
aA CI4(DECR), 129 (ASSPFC) ,2P2°ANNFS) ae’ 
chun Pe’ 
Ae PROVINE UPMATEN STACK PNTNTER FOR STORE} F,? 
whee  TNITTATE FETCH OF FYTT ANDRESS FROM STACK, “E,? oe 
t Ae & FE ,2 
___#AePOP SY GEN AN OPAP TAY, ANFTIERMIR) PA OMEMC) -LICPSSPELY,OSCMTRI, | 
7 CI4(INCR) ,IK(FRVIV,12CASSPEC) , 29 (AZFRE) E,? 
a Aww &.2 
7... WATT FOR EYIT ANMRESS TO ARRIVE | FROM MEMORY) ea | 
eAke PESTART PIPFIL INE aT FxIT ANNRESS* e .? 
whew F.? 
n,n. ee |, 1: Se... am 
£4ePNP IO REN AN(PNMPT3SY,1 OF TEFEMITR) ,GEMEMS) FE? 
what F.? 
rAwe CONTINUE PYPFLTINE STARTUPS J ee 
hae  FYTY BACK TO RAM TO RECORE NEXT INSTRUCTION, FOB —— 
tAwn ay 
_ AS, BRS ae eee nS ae 
—eASPNP TS REN = /PPSSEM),7(P IMPS), A(MEMCE) ,LOCTFEALIID, 11 (BSSPE%),  °£«-F,? 
wae CASCMIRI, TAF TNCR) ,LA(CRVYILY,12°ARSPET) -OOCAZERN), F.? 
A CisarPenut) | | | SS ree 
oo —— sseeieeleaenneas eaeiarienieene aaa 
eA ®t PREAVIDF PETLIPN ARDRFSS FOR STNRE ON STACKS F.? 
kak e MHFCK TF JIIMP ANMRESS VS LINDTRECT SONATE, STGN ne JtimMP ADNR F 2 
“ehane ” WAS SAMPLED Rab AT STKID.) eee F,2 
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a = a . Se ee ee = —_—— Sa ae eee — Ss a a 


a 


' 


t Ak % e.2 
____ RARPSHI2 GEN /TEPSHIB,PSHJAY,SCFT),7CALUSY »12CASP), 
e Aw C1A(TRNAYD, L195 (L OG) ,B(SPEL) ,1OCWATTMD) F.2 
kAn* E.2 
whee SET PF TO JUMP ANMRESS) seen iedeaeiec ieee en E 2 
Ad RESTART PIPELINE’ EXTT BACK Ton RAM, F.2 
kAdws F,? 
__#ARPSHI3 REN JP FSS2M),7CPIMPS) ,ACMEMCR) ,LOCTFSALU,1S(POUT), Eg 
wAx CIZCASGPRY ,OA4TRE),LACTRNAY ,L5SC(LAG) F.2 
tAnke Fae 
_ whee FETCH FFFECTIVE JUMP ANDRESS USING INNTRECT PotNrveRp §  — £F,2 
w Anke (THIS MICRA ADAR MIST RE EVEN) F,2 
wAkwn —,? 
ES 5 a ee | es 
 wWARPSHI4 GEM JNOPSHI5Y,1OCNFSAL') ,60MFMC) ,1P(ASGPR) ,24(RF), Fo 
* As CI4(TRNA) ,18(L 0G) E.? 
I ci wg ne agen, centimeters s aan ES 
tAnn WATT FOR EFFFCTIVE ANNRESS TN ARRIVES E,? 
wht F.2 
wat i nt ee ee eee. sees 
— #hePSHIS GEN = /N(PSHI6),A(SPFC),10CWAITMN) E,? 
when F.? 
wane CHECK TF ANOTHER LEVEL OF TNOIRECT == GR 
wAwe F e ? 
a Aw ARG #4 E,2 | 
__*AsPSHI6 GEN antes J3,PSHIG) SCFTI,7CMIRSI LI CBSSPEC),239CMIR), Fe? | 
kAw CIA(TRNA) ,LSCL OC) ,L7 CGPRT ,OA4FRE E.2 
w Ae & J F C F e ? 
+ Ane | a scnssioienancnipnacpaisesianouasnon tel 
wAew  RELATIANALZLAGTEAL CONVERSTON ROUTINES ~ F.2 
nae E.2 
tAwe TwM SINGLE PRECISION FLOATING POYNT NUMBFRS ARF COMPARFD, THE E,2 _ 
whew FOLLAWINE APTYTANS ARF ALLOWFAR RY THESE ROUTINES? ~— , as 
+ Ake 1) JUMP TE SPECTFIFD RELATTOM MET? (8CS xt44), F.2 
whan 2) TEST FOR SPFCTETIEN RELATIONS SET 4A TH ONES TF ee 


whee 000 RELATION MET AR TA VERA TF NOT, (BCS vift6y,  F,e 


w Ane 3) THREE WAY RRANCH ON LY,FQ,AND GT} F,? 
wAue (RCS wId4 MP KIGB), F,e _ 
isin Hr ae renee een ann ee ae ee ear ee Mere asf nner OTe reemrero Nee NT j 
caw PARAMETER FIFLA MF BCS SPEFTFIES RFLATTOW AS FOLLOWS! Ee? 
wAex ft « NE a ® ? 
: eee si alleles °° same iae 
* A #2 ? = { T F & ? 


- See ee ee 


PARE 


chien 


x*Awn 


ntAww 


w Awe 
cAwe 
* Ake 
Ake 
c2Akn 
wAkn 
k Ae & 
wAkee 


whee 


eAke 
wAwn 
weAdgean 


Aen 


*Awe 
xAws 


tAee 


wane 
wan 


2. . 


sAws 


eAeRFL 


2Aee 
xAaus 


_ wake 


zAku 


zAarRF| 2 
w*Aw 
thee 

wAene 
wAwne 
we Akane 
wAwkF LS 


wAen 


when 


when 


 wheRFL a 
wAw 


xAew 
¢*Anne 


thaw 


f 
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coed ih Seenericni aaah: = meena manne 
4« 3% WAY RRANTH F 2 
Ke 3 WAY RRANCH F.? 
; oat a Seema > meee. 
7 « GT F.? 
F,? | | 
Ca Kk js. °° -(” << aaa 
PR e@ ANDR NE FIRST NPERAND E,? 
PQ e FIRST WARD AF FIRST OPERAND F.? 
PA » SECANNT WhiPn AF FIRST APFRAND ~ —_— oe eee a 
OF « ATFFEPENCE RETWEEN MPFRANNS# ALSO SFT TON FLAG RFLE,? 
RE « ANDR AF SFCAND NMPERANN Fae. — ___ 
MIR» FIRST/SFCOANND WORD OF SECOND NPERAND. FD ——- 
NPRe NIFFEOSENCE RETWFEEN QPEFRANA SECORD WORMS, F ,? 
AMUNS = IF NF, THEN JUMP IF RELATION MFT) SET AY ENTRYF,? 
ae | re me \ eae 
CAIITTONS THIS ONNTINE MAY AIOT RE USER TO CAMPARE NNUSLFeWORD F.? 
FIYFM PNT NIIMBE RS: SINCE FORMATS AF NFGATTVE NUMBERS F,? an 
“ARE NOT CONSTSTENT. [2 | | 
E,? 
— oe Ee? ae 
REGIS FETCH ME wORR ANF, NPERAND ONE (AR IND ANDR) FL? 
F.? 
SEN _ANERELA) ANCMFSMIRY, SACMEMCD = sree ME cer, escent esc ciabarresenigtea nc taiicai 
TF ANDRESS WAS INDTRECT, LOUIP AACK TA FETCH FIMAl ADNRY F 2 
SAVE FINAL AMN®] Fe? ‘iis 
es, resem 2 ean emma ot cama esis 
CEN AT(RELY,REL SY, SCTTI,7(MIRSI, 11 (BSSPEC) ,PS(MIR), F,? 
CV4PTRNAD,ASTLOR),I7ZCGPRONT) ,O4(RA) Pee. 
F.2 
INTTTATE FFTCH NF ADDR OF NPFRANN TWN F,? 
‘THTS MICRA ADNR MIIST BE EVEN) —_—— ; Fy? ss isis ee 
F.? 
GEN AN(REFL 4), 13 (CTNCP), 10°F SP) , BC MEMS) cae 
FO 
RAVE WHR ANE HER AND HNET a ARI A: gee a 
F,2 
REM /NORFLSY, 149 (RESPEC, P3TMTRY, TAC TRNA) OISCLOG) FL? 
RAT PGPRANT), 247299 es: | sie 
‘ F.? 
RESIN FETCH MF WARD ANF, OPERAND TWN (OR IND ANDR), F,? 
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#AWRFLS GEN  JSNERELAD,LOCOFSMIRY,ACMEMC) 8 8  ©©—©—©~©—©6 as | | 
c Awe F.? | : 
___*#hwe TF _ADOR WAS TNOIRECT, LONP BACK TO FETCH FINAL ADORE = = Pye _ 
eA&e SAVE FINAL ANNR? Fee 
rAww Eee 
_._#AWRFLA GEN = ATFRELS,PELZV,S(TTI,7CMIRSI LIC BSSPEC),23(MIR), Fa? 
xA® CI4(TRNA) AS (LOG) ,I7(GPRONT) , 24 FRE) : F.? 
shane F.? 
thane | INITTATE FETCH OF SECOND WORD, OPERAND ONES = Eg 
Anne ‘(THIS MICRN ADAR MIIST REF EVEN), F.2 
cAwene F,? 
___ #AWREL? GEN ANERELAD,IOCNFSALUY,ACMEMC) ,12fASGPR),24(RA), Fg _ 
Aw C1A4( INCA), 1A (CF RYI),7(ROVEL) F.? 
nAww Fee 
thee COMPARE FIRST Twh WORDS AF MPERANDS Fg 
wha F .2 
wAwRE| AR REN AN(RFLO) LFF ASGPR) , SACRO), 11 (BSSPEC),23(MIR), F.? 
eAe reese a eee 
eAke | E,? 
shen TF OVERFLOW NCCUPEN, JUMP TO MAKF LT/G6T NERLISIAN F,?2 
tt oe eee. | 
tAwRFLO GEN STFRELIO,RFELANY,SCFTY,7(0VEL) E,? 
LY! F.? 
_ wAwe ss TF OS TGN SET, THEN JIIMP TA LT STATE Sete hui ates an ST 4a 
aAan | . F.2 
£AeRELIO GEN ATCRFLAL,RLT),SCFETY,7CALIS) F,2 
RN ee ee ee ee ee ee eee - 
Ae % TF FIRST WORNS§ OF APFRANNS ARE ENUAL, REGIN FETCH NF OPS SELONF, 92 
shan WOROe FLSE JtimP TO GT STATE, E.? 
Am ceca cic cect cede niacin sesamiae paces Fa? : 
#AWREL(Y GEN ATERELI2,RGTY,SCTT)»p7CAL'NZ) ,LOCDOFSALU) ,G(TESTT), F,2 
*Aw CIQSCASGPRI,P ACRE, LACINCAS ,L6fCRY1) E.? 
wAnkn | | E,? 
— @#Aew SAVE SFEANA BORD OF PPFRAND QNE 000 T ED 
hen E,? 
___#AWRFL12 GEN /NFRELISI,LICRSSPECD 23(MIR) L4(TRNB) ISCLMG), Ee 
 whe——lU™”™””~”: OO RLUAULZUEG PROUT), 2 47P A _ _ — — E,2 
khan E,? 
hAws WATT FOR SECANS WORD OF OPERANT TWA E,2 
sear * =~ Seen ae 3” 
wAwRFL 43 GEN AB PRELI49,R8 (SPECI, IN CWAITMN) F.? 
rAan E.2 


whew ~~ COMPARE SECOND WARIS fF APFRANDS pF 
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ee 


| 


on 


Ate NOTES AVERELAW SHONLA NOT BE PASSTALE HUF TO SNGL F,? 
any PRECTSTON FP FORMAT, Fe 
se ig ee E.? 
#ARRFL (4 GEN /NFRFLIS5SY,19(ASGPRY,24(RAD,LI(CRSSPFC) ,PSPMTRI, | F,e? °°} © 
*Aw CIACSUBY, 167 PVYI1S,7FSROVES+SEALII), TEN SFO, 1 SCOPROIIT F.? 
nae ee | | | | Fe? 
shee TF WNRNS EQUAL, JUMP TN FQ STATE “EF, _ 
shat c.f 
_ #AMRELIS GEN  /TERFQ,RELIGY, SCTTI 7 CALUZD | a | 
"TY TT: | — ees - ee 
cAnke TOGGILE STGN TF OPERANDS (FIRST WORD) ARE NEGATIVE FE ,? 
thane OC THIS MEPRA ADDR MUST RE EVEN) 
tAken F.? 
wAw ARG eo { PLT ON EVEN WORD FE .? 
@AWRELI6 GEN —— /NERELI7Z1V,120CASGPR),24(ROI,1I(RSSPFC),23(0PR), Fee 
che a CI4(ENRI,15°7LNGI, TEO,SFO,7(S88AL!) F.? 
than F,? 
shee TF STGN SET, JUMP TO LT STATES ELSF, GT STATE, 0 8 GA 
Aw & Fos 
WAWREL (7 GEN /TERIT,RGTI,SCTTI,7(CALIISY F.2 
rAwee F.2 
tAwae MAKE LY/QT NECTSTON AFTER MVEREL AW 00 
tAwes (THIS MICRN ANNR MIST RE EVEN) FL? 
twas ns 
— wARREL OO «GEN /TERET,RITY,SCTTY, 7 CALUS) E,? 
eAwwt Fe? 
Aw et SIGNAL LT,FQ@, AR GT BY LOADING RE WITH 91,0,9R 1, si 
— #heee RRANfCH TM RELATIONAL CHEK USING PARAMETER” FIELD OF RCS  F,? 
tAawne (THIS MIFRNM ANDNR MIST BE EVEN) F,? 
ale a ee inmates tees sg ean 
& A te ARG a+] | F,? 
*£AaRT REN AF CTINE),F89,29779,12°ASSPEL) ,2ACAZERN), e 2 
At CI4fDECAD,A7(GPRONT),294(RE),TFEO,SFO,7(SRALUY,1SCINCP) FQ? 
tAeREO REN VF CTINE) FSO, 207), 1D TAMSPET), TOOTAZERD), rs 7 ae 
the CI4(TRNAY, 18 (I NG), LICGRPROUTS, O4(RF),TFO, SFO, F.? 
A oo C7(SG4uly, ALSCINERS A 
— w#AhaRAT REN S/F CTING) ,F89,2771,12(ASSPEF) ,22(AZERD), _ E.2 | 
nAw CL4( INCA), 16(CRY1),17(GPRAUT), O4(REY,TEN, SFO, F.? 
Ae ET ESSALUD,ASCTNGPD nites AM nsncsigustinnsspnomaneintananreiectiniisoi 
whee Feat 
hk Ak PEI ATIONAL TESTS F 2 | 
Ae THESE MICRNAS TEST FOR ANF AF THE 6 RELATIONS OR | E,2 
thes | REGIN PRACESSING THE THREE wAY BRANCH (ATFY, } } } © £2 | 
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nAwe THESE MIT RNS MIST RE ON AN @ WORD AOLINDARY, E.? 
whe ©3>©RR..””” COU PLY AN EVEN WOR 000 00 EY? 
eaeTINE GEM STERMET,RNATY ,SCFTI,7CALIZ) F.? 
WAT TEQN GEN “/TORMET,PNOTY,S(TT) pF CALUZ) ae + en 
eAeTILT GEN /T(RMET,RNAT) ,S(TTY,7 CALS F.2 
#AeTIGE GEN /TERMET, PNATS,SCFT),7 CALUS) F.? 
#AWATFY GEN /NCATE2) ,LOCMESALIID, B(MEMC), 12CASP1,11(BSGPRI,23(RE), F,? 
ft Aw®0)0™™””~”~”:C EA A AMONY, PAP CRYE) wae FETCH 3eWAY JUMP ANDAR wan F.? 
«Ae GEN MNCATF2),19( MF RALUI,SCMEMCI,12(A8P9,11(BSGPRI,A3S(RE}, F,2 
ee... ee CL4CAMD) 16 CRYN) wee FETCH Seaway JUMP ADDR wwe Fo? 
aAeTILF GEN INOTINE) ,L9(ASGPR),24(REY,1A(DECA),7OSEALUS, TEO, SFO F.? 
ehaTiIGT GES AN(TIEN) ,LAICASGPR) ,2A(REY ,LA4(NECA), F7OES&ALUY, TFA,8FO F.? 
| sine maese sipuine nts esate teopacasseiseenasipeearimmastipssire sntntnnnNeM Em un 
caw FLAG RELATTON TRIE? TEST QINS TO DECTDE TF JUMP WANTFQ, F.2 
shun F.2 
2 en ee 
2AeRMET GEN AT(TERO, JIRZ),SCFT),7(OUASI, 12(ASSPEC), 22 (A0NES), FE .2 
+ Ae CI4(TRNA),15(LOG),17(GPROUTS, 24(R0) F.? 
hens w<aaenipaansnnaani spioaiasiniciguiaitinapacesominpaiaaaiiinaaioaiameaiaed ininiucrnasinsas tee a 
whee FLAG RELATTON FALSF, TEST QUAS TA RECINE IF JuMP WANTEN, ae. 
sAnne THYS MICRO ANDR MUST BE FVEN, F.2 
____* Ae | eS ce eee ee en 
wAGRNOT GEN /TCTERD, JIRDY,SCPT),7CAUNS) , L2CASSPELC) , 22 (AZERN) , E,? 
aA CL4(TRNA),15(LOG),L7(GPROUT) ,24(RO) F.2 
5 5 een 
er Nt) JUMPe RETURN | AGIPAL VALUF TN ROP E.? 
chan FXTT TA ROM, F,2 
hh ee ete eee eee siesta aan acct meni Se ‘ 
An ARG #0? 2 
#aexTFR® GEN /P(SSOM),7(CP IMPS), A(MEMCS) ,TEO,LO(TESP) F,2 
wA mks | EF ,? 
wAexe UMP JF RELATINN MFTP }©—”. —. ae 
kAkae ADVANCF P Ff SKTP TIMP ANNR ATHERWISF, F.? 
tAket THTS 4TCRO ANN MUST BF FVEN, F.? 
ist US “ESO AOR Bul Be EVEN A eee 
2#Az NRG wed E 2 2 
wAweJTR? GEN /TCTFRO,ATFLY, BCFT), 7(GPRS),12(ASSPEC), 222 (AONES), F.? 
An — ETEIDFEA) , 17 (RPROUTY, DACRE), I L3CYNTP) e,2 
cAwkeaw E.? 
«Awe FETCH NEXT INSTRIICTIAN (AR IND ANDR), F,2 
“a hana CO FRYS MICRH ANDR MUST BF EVEN OCC oe a 2 
xAw ARG a> { e «2 


te ee a Poo 


PAGE 19? ORS/12/7K EFOSNUPCFE VARTEXK CAMBY FPPUWCSs nn 904 HNURS 
kAwATFO GEN IN(ATFS), LOCTESMTIRY ,ACMEMCG IO eee ee 29 ee _ 
nA F.? 
ow Aee _ _TF INDTRFCT ADNR, LONP RACK TO FETCH EPFECTIVE ANOR} F,2 ; 
ahh SAVE FFFFCTIVE ARNR TR PY ee e- 0UC‘i‘OSCS 
kAws F,? 
__. tAWATFS GEN  —  S/TEATFA,ATF2Y, S(CFTI,7(MIRS1, 15 (BSSPEC), Sets see E.? | 
ke | tie CIAPYRNA),1 i= fl AA),1 LacPory — i * ae 
thu F.? 
Awe FONTINU'E RESTART MF PIPELINES aks 
ros EgtT TA BAR a ae eee eee eT  ” ecereeen 
wane F.? 
___*AwATF4 GEN  —— /PFSS3¥),7 (PIMPS) ,6CMEMCS) _TFO,INCTNCP) ,IOFIF SP) a oe 
— Vie | ) ee | Se eRe | ‘foo 
shen E,? 
wAws TWO WORD INTEGER MATH ROUTINES F.? 
en on ce Oe ee ee ee ee nvcamsu ee -_ " 2? cele 
w Aw FALLING SENUFNCES Fi? 
Ane (MPEP AND 4 JN ASR REGTSTFRY | F,? 7 | pens 
er 7 a ae - fod —_ 7 : es * ae | 
eAww NATA fARNR NE OPERAND 24 F.2 
char F.? 
Soaey YS a RSA eE Ee aa ee a _ ane aeenetaneieeeaeieimeaaaeamaiemmnanial 
eAnn PES VALUES?) Fee 
wAnk ee WLS tS ,  -S 
whny TSR = 01053474 -.? 
than TMV @ A1N5SAO7 F.2 
nha TOV = A{AS5N67 E.? 
7. Sie Sd eS aie 2 5 ere peebeue: eee i sees Obs aPiegeceoiecsi 
HARKER KEKE EES F 2 
nn sess RMN seeing eee 
tAken TF OPERAND APNSESS ITS INATRECT, LAMP RACK TN RESOLVE ITS Fe? 
crhene SAVE FFFFCTIVE ANDRESS IN PRC, F.? 
eA (THIS MICRA ANNR MIST RE EVEN) F,2 
oe wit sc ME as dt MN dag EL iE ee esata ic cc as ees ahi” * saan 
naw ARG «+4 LE AVF SPACF FOR TARA E,? 
wAwT AR REN STCTARS, TAR29,5(FTY,7(MIPSI, 91 (ASSPEC),23(MIR), F.2 
Ae en EVAPTPNA) SLR (LNG), EPCRPROUTS ,-DatRO) — es 
#Ax MRE > 4 LEAVE SPACE FOR SNIN Fee 
kAwke Fee 
wAwae FETCH YNNTRECT ARR SS — Eap 
sAwee (THIS MICRM ANNR MIST RE FVENY ee 
wAnkae Ese 
#ARTARD GEN ~ YPNEFTART),LO(NFSMYR) ,6(4EMCD ©) EDD 7 
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PaGE 1% OR/1A2/75% EPSMPUPCE YARTEXY COMSyY FPPWCS h0 O04 HMILRS 
nari os eens deatsbe Eeneptane peaaeiccamesettean emacs San 
thene TNTTTATE FFITCH OF SECOND OPERAND WARA? CLEAR NVERFLOW FLAG, F.? 
a 2 ee 
the TAR? GEN AN( TARA), LOCMERALHY,ACMEMC) ,1207ASGPR) ,O4°RK), F.? | 
+A CIACTINCA), 1A CFRVIV,7°ROVEI ) - 2 
ee re ee ee 
w Awe SAVE FIRST WORD MF GPERAND 2 F.? 
tanh F.2 
__#aeTaorG? Fav ® SAVE PASTTION 
uA & ARE TAR{ @] RFI NCATE YARA F.? 
whe TARS GEN IN(TARS) ,LIECPESPECY ,OS(MIRI, F.? 
Ae _ “CHACTRNB), 18 CLOG) LP CGPRONTY, o4(RC) a a. See 
kA*® al ar TANRSG 4 RESTNRE PNSITINN F.? 
e A te te F.? 
whan RERIN FETCH MF NFXT TNSTPUCTION TO RESTART PIPELINE ANA E.? 
thee) UPNROCFE COMPLETION OF FETCH SF SECAND WORD OF NPFRANA 9, = FY? 
chee Fee 
#ARTARS FEN ANF TARA), LOCTESPY,ACMEMC) I SCINCP) og? _ 
aAnwn E<? 
wAwk SAVE SFCINA WORD NF RPFRANN 273 F.2 
ear 11SF FIFLM SELECT OM RCS TO BRANCH TA ANDSSIIATRACT AR F,2 
thee MULT TPLY/DIVIDFE POINTINEGS, FLO 7 
thet cece 
#AexTARA GEN  /FFIMOY),FSA,2013,11 (BSSPEL),23(MIR)» £22 —_ 
whe CIS TRNR), 1E(LOG) AP (GPRONT) Oa (RN) 2 
caw FIFC Ef 
Ce) — ae 
aAwe MUL TTPLYeQYVIDE COMANN MICRONS F.? 
wAxkx F 2 
tne ee, 
a ae FNTTTALIZES STIGN FLAG FRA AND OLNSYY F.?2 
wAwae TESTS SIGN NF NPY AND TF NFG, FTUMPS TN COMPLEMENT fT, F.? 
Aw ee (THTS MICRON ADDR MIST RE EVEN), F.? 
eee aociateennapianeeennaeniaaniaieine aueniaeiiansléiceleaeenenmnneeniememmmmmmmaaee 2 samme — 
woe TM § CEN ATECIMND, TMMAS SC TTY, 7(GPRS) ,IOCAESPEC) , POCAZERNS, F.? 
hat C14 TRNA), 1S(LOG) 17 (GPROUTS, DA(RA),wFt,SCO F.? 
whew ORG weet LEAVE SPACE FAR” TAS{ “oe re os 
«cAww F.? 
wAne MAKE QOP{ PASTTIVE , YTORGLE SYTGN FLAG , F,? 
x Aw IM()9 AMS K JP PPAGFSTCMPY ,1O0FSTACKY ,1ACPIISH), FO 
eA CISCPAGFeI¥N3),1 AS,TFO, SFO FL? 
ere OPE Bh ace ER Rens A 2 dl amnmee > 


 wARIMD IO 


GEN PP YMUTY, FSO, 201), 11 BSGPRI, OSTR1), 140TRNB), 15CLNG), Fy? 


PARE 14 OR/ID/TR FOSNURCE VORTEX COMS8Y FEPWCS Ye) 9N4 HOURS 

Awe) 6oTRANSFFR MS(NPT) 3 ee ee —_—— = 
eA he (THIS MICRA ANNR MIST RE EVEN) E.2 

A es | ee 
a Aw ARG +4 “ALLIGN EVEN LARATIANS F,? 
tAwvIohMps REN ANF IMDA), LIC ASEPR) ,PACROD,LA4(TRNRA) ,15(L OG), F.? 

Ae ENT EGPROUT), 24078) eee eee F.2 so ees 
wAat | E.2 | 
cAk*® TRANSFER LS(MPL) 7 E.2 
thee ee a ss EB 

Aa IMDA  ~REN JN IMDS), TIC REGPP),OS(RID,140TRNP) (35.06), |  £z-F 4? 

“At CI7FFEPRONT), PAR) FL? 
_ Awe | eats | es 
ere ee SETUP MS(OP2) FOR POTENTTAL COMPLEMENT, Fe? 
w Akt F.2 
saw IMDS QEN (IMDB), AT (ASGPR),23SCRCI,14°TRNRA) 1901 NG), fe? 

ey ae oF ay »2A(ROD ED 
cAnwen F,? 
ches SETUP I S(NPDYy sciaissanenbeieunsentesasaeaeannaieitannenesmeprentaaaiagsieneansiitieniemiani Sasinnsempines ated 
tAkve TF MP2 NAT NEGATIVE, SKIP ROMPLEMENT, F.? 

Akt F.2 

eAtIMOR GEN JTCTIMN8,THNZY,SCFTY,7(GPRSY, VY BSGEPR),293(ROD, t,2 sis 
ie Ae = RTD ETONRY, PR CLOG) ,PPCGPROUITY, 9aCAtD rn ee - 

nAkks F.2 

wAake “AKE 02 PASTTIVFE; TOGGLE SIGN FLAG, - Fee 

— eAeee ©) oFTHES MICRA ADNR MIST RE EVEN) E,2 
sAuke? F.2 
wAeIé(y7 CMSK  /P(PAGF+TCMPY,10(STACK), 16(PIISH) ,L5S(PAGESIMDAR), €,2  __.__._—_. 
eae _ CL BS, TEN,SFO E,? 
tAne Cet 

__._ wAwt TRARSFER MS (MPO) | ee 
wAke — | | F.2 
#Axe TNR REN ANE IMNO), 11 (CREGPR), 23(ROY,14(TRNB) ,L95CL OF), Fe? 
kAw CI7FGPRAUT),24(RB) i _ 

ro GIFT GPR) Ae CRB) ee aC 
eAnn FLEAR RO TNPREPARATION FOR FIRST MULTIPLY FL? 

*k* Awe | F rs 2 a 

~ WAeIMN@ GEN = JNK TMDI1OX, 12°ASSPEC), Q2CAZERN),L4°07TRNAD,15°L9G), ~ E.? 
has CIT(GPROLT),24(RO) E,2 
wAae F.2 - 

Whew TRANSEER LS (APOS? 7 OE an E.? | 
eAks 'iSF FIFLM SELECT TM CTHANSE BETWEFN MHILTIPLY AND AIVINE, E,?2 
whan F .? 


PAGE 15 OR/12/78 EPSNURCE VARTEX CoMsy FPPWES 00 904 HOURS 
aAw CI7(GPRNMUT),24(RC) a E,2 
rae FJEC F.2 . 
7... on ee ee 2 ee ee 
wAnw MICRMS UNIQUE TO MULTIPLY E.? 
tAken E,? 
CC | ee ene ae 
a Ake SETUP LS(OHPYIFNR FIRST MULTIPLY E,? : 
wAtns (THTS MICRNM ANNR MIST AE EVEN), F.?2 
et ee Lf 
 wAe IM’ = GEN JNCTMUB), LICREGPR), ROV,14°TRNA), S51 NG), F 2 | 
x At CI7FFGPROUT),24(R53 F.? 
wae RE wed __ ALLOW SPACE FOR TOME a 1 
# Ak % E,? 
tAak MULTTPLY LS(NMP1) AND LS(NPP) F.,2 
zkAun | ee a nee _— __F 42 
we AREMUES) | |)|=6BMSK OJP PPAGFaMitl ), 1 O(STACK) ,LA(PLISH), 15(PAGE STM 4), F.2 
eax C1 8%,TFA, SFA E.? 
__* Awe Siena ae gente eee ee 
Ae SavE LS(LSYXLS) E,? 
tAue F.2 
waa TMi REN ANCTMU5), 19 (RSGPR),23(R1), 140 TRNR) 15106), E,.? 
— wae CVV(GPRIIIT), D4(RDD i es A 
wAxe F.? 
wae ig OE ala Le SE eS ae EO Le hd es i a 
— eee. te A, ae et | go 
wAkIMUS GEN JN(IMUB), LI CRSGPR),23(RAI,T4(TRNA) LS(LOL), F,2 
ae CI7TPGPRAUT) P4PRAY i nowe 
wAkw F,? 
Ae MUL TTPLY MSPPPT) AMD LSCMP2V¢ CPLUS “SPLSXIS)), F,? 
thes tanec Fe? 
MAR IMUR © ©6GMSK SP FRAGFOMUL), 1O(STACK) ,LACPUSHY,ISCPAGESTMII79, © F,? 
tas ClLA%,TFO,SFO E.,? 
ead s E.2 
whee 06d SAMPLE MAST STGNTFICANT WORK AF PRADICT, MSTAS¥LS), as 2 7 
cAne EF .? 
eA TMU? REN ANCTMUR), LP CASGPR) ,24(RO1, 147 TRNA),LS(LOG), | Fe? 
a ) . ee ETEA,SFO, 7 REAL —_ —. oe _— 
win F .? 
tAws SAVE LS(MSeL$) 8 ARANCH TA SET AVERFLAW TF F.2 
—“phaw MB EMSELSY WAS NOWIVERA EP ~ 
whine E.2 
w#AxT MUR BEN ATCIMUD, THIN) SET), 7CALUZ) LICR EGPR),23CR11, E,? 
er? \ ~ Cte CTRNAY, 186 (LOG), “TI TEPR OTS, 3 U0 9 en 0 ~ 
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tae TMT 
Awake 
vAwws 
vAene 


thew 


tAxne 


at SESS MICRO ADDO Mgt BE EVEN)». 


kA LA eR le led I A lS hich Te, a 


REN ANCIMUTOD, 12CARSPEC), P2(AZERND,LA(TRNAY,I5CLNGI, 


CI7PGPRAUT) 2a (PN) ;7CSOVEL) LO C(TESP) 6 (MEME) 


SETUP MS(NPSY FOP MUI TYPLY 


PRE “+4 PUT AN FVEA | NATION 
REN JNO IMUTLY, TI CRSGPRY,AP3CRAD,LACTRNRAY,I5CL AGI, 


“CI7(GPROAUT) ,2PACRCI 
SETUP LSfOP19 FOR Mit TTPLY 


REN INOCTMLI2Y , 11 (R&GPR) ,2F3FRE) J 4(TRNAY ,L5PLNG), 
LAF PGPRAUT) 24 (PA) 


a oo ay 4 ae —. * e = = rr = ar ss 


MUL TTPLY LS&C(NP1) AND MS(NP?) 


BMSkK JP EPAGFEMII YD, FOCSTACK) IA (PUSHY ,15(PSGE STMT Sy, 


CLAS, TEN, SFO 


~ @AaMPLF MAST STGNTFICANT WORD OF PRADICT, MSCLS¥MS), 


GEM = S/NFTMUTEY,IPFASGPRI,F4(RO),LACTRNAI,I5C(LNG), 
CTFOA, SEA,7(SSALII) 


SAVE LSCISwhS)s RRANCH TM SET AVERFL AW TF 
MS(LSaMS) WAS NONZERN, 


7 ae es a a 


REN ATCTMUIIS, IMUIAY, SOFT), FCALUZI, UL CBEGPRY ,PSCRID, | 


es 


ETAT TRNA) 8 CT PAY, 17 CRPROIUTY, Pa(RO) 


SET AVFRFEL MWe 


CANTIANS THTS WILL RESIILT TN QVERRYDE YF MEMORY ACTIVE, 


BMSK —«-_ANETMUIGY,7ESAVELISFI,TFO,IO(CTFROVR) 
CET MNT STGNIFICAMNT LARA AF RFESIILT RY 
ISLSXMSI+(LS(MSYLSV EHSL S¥LS)I, 

PTUES WIERD ADNR Mist BE EVEN) <" Re ee San 


2s a == = apo a a EE 7 = a 


SET OVERFLOWS CLFAR RO, fUNUSEDN | MEM REQ NUE Ta SOAVFL FYELDS), 
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rAge 
rAee 
tARIMLINT 
vAe 
rtAww 
we Aae 
vAwne 
eAe IT “UTR 
a2 
vAws 
tAee 
tage 
tAuwe 
eAwT Mig 
rane 
vAus 
tAane 
Aen 

Ae TMUPO 
vA 
Awe 
‘ghar 
rAee 
vAwIMliry 
7\ 7 
Awe 

Anne 
hak 
yAaw TMLISS 
yAwe 
7. ? 
aa 
eAxIT Mies 
vAar 
vAuws 
vAwke 
yoen 
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vAww 


OR/I2/7R ESSNMURCE yARTEY Comey FPPWCS 0 905 HNURS 
GEN — JNCIMUI7TY, T20ASGPR),24(RO),LICRSGPRIP2S(RAY, ©Fee® ——— - 
C1A(ADDY 17 (GPROUT) »7 (SROVFS) F.? 
ee ee eee nT ee ree sists cicadas snap msl ME ads sums accep cas See ee 
SETUP LEAST SIG WORN OF RESULT, LSLSXLS), F.2 
- .? 
GEM ss JN IMUTBY NI FREGPRI,23SCRN),14(TRNAI,IS(LOG), jj — Fe ae —_ 
CI7T(GPROAUT),24(R1) . F.? 
F.2 
SAMPLE MS(MP2) AS PART MF FINAL AVERFLOW CHECK, LAT _ 
- .? 
CEN INCIMUIDD, TP CASGPRI, 24(7RA),LACTRNAY,ISILAG), E,? 
Rode 8 a a ee 
FL? 
TF MS(APD) WAS ZFERA, CNHULAINT CAHSEE AVFREL Aw SN JUMP TA FXTT? FLO 
FLSE, CHFCK MSOMP LY eee eee et ee 
FO 
REN ATCIMUPS, IMUPO) ,S(TTY,7CALUZ F,? 
PHECK MS8(NPL)S F.2 
(THTS MICRO ADNR sani RE EVEN) F.2 
-.2 
ebatal mate A 2 wie iat : 5 tea: oe: a a a 
GEN “INC IMUP19, T2CASGPRI,P4PRA), L4(TRNAD,LSPLAGY, F.2 
C7(SS$ALtI) r 2 
| ssi desc ehestesceoratn sa ncbasAltesDincie seas Gian aniin asses wiiiess 4. ests cesasestecaen eee): see ' 
TF MS(MP1) TS ALSN NANSZERN, JIIMP TO SFT OVERFLOW, F,? 
4 
BEN ATE EMUPS, IMUP2) ,SCITI 7 CALUZY ee 
F.? 
SFT AVFRFEL OWE CAUTION: MEMORY OVERRINE TF MEMORY ACTIVE Fe? 
(THIS MICRA ANDAR MUST RE EVEN) ee. ee ee 
a fell il! | . = os Seoeitasiisiaith f*5 
REM AN(IMUPSY,7CSOVEL) SFY, TFO, LOC TEROVR) F.? 
F.? 
TEST STG FLAG (AMLINS) TN SFE TF PEST SRAIILD RE NEGATIVE, FB 
F 9 
GEN ATO TMUID, TMU R AT BOE FCSN oe 
F,? 
MAKE RFSIILT NEGATIVE F,2 
(THIS MIFRN ADPR MISTY RE EVEN) F.? 
Ce ee eee Ieee ee rr ee Gr ren 
RMSk /P(PAGE+TCMPY,FO(STACKY, 16 (PIISH), Fee 
CIS(PAGFE4TMII25),LA3,TFO,SFEN FL? 
italia al * meee 


AGE {RF OA/IS/FH’ FOSNMURCFE VARTEY CNOMSy FPPWCS nn 905 HNURS 
aT Sl i. | Oe . 7 de 
raw E,? 
tARIMU2S GEN /PCSS2M),1O(PIMP),SFO,TEO E 2 | 
Tee “page Te ALN TiS Je | _ aia. Sanne 
tAwn PA? 
tAee MINTQHE OFVINE MICRNS E,2 
— Ne SNCS ee ETE TA ee RE NE AS ter NeSS: a ma noheeseienannna 
thei VOPB FA P F.? 
vAwn | E.2 
~ tAee ~~ SAMPLE MS(MPO) TN SEF TE SHNHULA AITVINE AVY TT, : ‘2 _ 
rAws F.? 
Aw RG TMitgeg PLACE TN FEIN SELFCT TARLF La ee 
Aw TN REN INFIAV2I), 1L2CASGPR) ,24(RB),14(TRNAD,15(I1 NG), F.? 
Aw C7(S®AL'N) F.? 
vAw ARG NVOREY RESTORF NRG ANDAR &,? os 
en dS A i Sp | 9 Sad Re SIs hI lh 2 ge ci 
vAws CLFAR ROP TF MS(NAPS) wAS NAT ZERN, grime TH NIVINDF BY TT, F.? 
take FLSE, COMTTNIE JM SEOIIFNCE TO MIVINE RY 1S, J [oe 
res Pk ieaaiimeans , < & 
rAweINVO GEN AT CIAVS, TOV2N) ,SCTTI,7ZCALUZI,LACASSPEC) ,S2CAZERD), F,? 
ths CI4(TPNA),15(L0G),17(GPRONTS 24 (RO) F,? ; 
—- Sh Pr gee ten”. 2 eeaeeaniaieatiaemen piesa 
tAnwe CHECK TF L&(NP?) IS Z7ERN F.2 
tAen | | si aes sesamiae a ae heat teeta a : 
"vA INVS GEN  J/NFINAV4A), 1PFASGPR), 2A(ROI,1 S407 TRNA) ,L>CLOK), F.2 
tAx C7 (SKAL!I) F.? 
tAw ARE aed. L FAVE RONM FNR ITAVPEO F.? 
are sine wes <ecsmeicun’ tea we ne mee VE BUM Fe ive’ >? meee 
vine SETLIIP MSFMPLY FOR NIVINE? FE ,? 
vAws TF LSCAP2) wAS ALSM ZERO, JIMP TA AVERELAw EXIT, ee 
ee a A a dal oh EL Sah Se et) Eee 3 | sts 
kAwINVA AEN ATCIAVOF, ISVS) SITT),7ZCALU7) ,LICRSEGPR) ,23(RAI, F,2 
Aw CIA (TRPNR),IS(LOG),I7(GPRONTY,94(R1) F.? _ 
ee ys =_— 2 
Awe RIVINE MS(NE1) RY LSCOP2) F,? 
tAw* F.? | ae 
eae AVS GASK /P(PAGE+ATV), 10 (STACK), LACPUSHI, | oo i) 
vA CIS (PAGE*IDVE’,1.B3,TFO,SFA F,? 
vAat sx cesses steeds tasers dst tenet ectesap toes Gian aaeaterepteictaese scoasoetcncntereretcesan OA Nese aati 
tAws RAVE QUOTIFNT AS MAST STR HARD NF RESULT, F.? 
tAxe F.? 
tAwT AVA CEN JNCIPV7),11 CASRPR) ,PS(RID, 140° TRNP), AS CLAN F.2 
wae —————,— OM EF EGPROUT),24¢(R809 8} 8©=— F,2 


i pot 


27ARE = ==619 OF712/75 EASMURCFE VARTEX CAMSY ott es ao 9S HOURS 
hAwn F.? 
eAee = =—CSETUP LSfOPS) FOP AIVIME = = CC eects ee eee Ag? 
vAks 4 
CASIOVZ = =6GEN ANE INVA), 11 CRSGPR),API(ROV, 140° TRNA) ,FOCING), F.? 
bg CUZ (GPROUT),24(R 1) 2 easels Hao cit etcarisase cama rs iM Mg tg 
khan E,2 
hAww NIVINE REMAINNER + LS(NMP1) BY LSne2s, F,2 
a secueiuecniaus | 
eAeTNVA = GMSK /P(PAGFE#NTV),19(STACK) ,LACPIISH), Ee? 
eAn CIS(PAGFeTNVO),1LR3, TEN, SEN F.? 
Awe ee ee Pe See ee ee ee 
kAws RETUP MOST STG WORD AF RESIILT IN RA FOR RETIRN, F.2 
rAwe LEAST SIG WORD I8 Th R41 FROM PREVINUS AIVISTON, Fe? 
Ake | eS Fe? 
eAw[Nve GEN AINCIONVIOD, V1 FKSGPRY,F3 (RN), L4(TRNABY,LSCLOG), E..2 
An CI7(GPROUT),24(R0O) F,2 
ve A rx gant ic a ily igus rea dN cei sii et es A a i nn ants css shila psn encanta abt steps Scesa aN sete idatasen aaa E.? 
eAwt SAMPLE STGN FLAG TM SEF TF RESIILT SHNULD BE NEGATIVE, F.2 
ties E,? 
_ #AWTNVIO GEN —  /NFTIAVILD IA FASGPRI,24(7RA) L4(TRMAV,ISILOGI, ee 
hie C7 (SAL!) F.2 
Ane F,? 
wAee TF RESIILT SHMUILD KF POSITIVE, JUMP TO EXIT, ee 7 
re Aw | F # ? 
aawINvey REN ATCINVI2,INVISI,SCTT), FCALUS) E,? 
|), a re a Te ne _ Keri eceeeeee aoe ee oe oe — 
w Ant MAKE RESULT NEGATIVE F.? 
eae F.? 
_wAKTOVI? GMSK — — /PCPAGF+TOCMP) LOFSTACKY ,16CPRUSH), ce none BE 
& Ax 15(PAGE4INV13),LR3,7F0,SFO F,2 
wAwk E ¢ ? 
# Aw FyTT TO ROM, | E,? | | 
ee EXTT TO ROM, ssaciiillesSeseaaafsaahioeseeseceindy sede emenstamstseesetascsodon atest — ti 1 Seana 
kAeIPvt3 REN /P (S824), 19 (PIMP) ,SEN, TES F,2 
whe FJFC | a fee ceases sees 
ee veh abner sical tli i si a  egeR _ 
Ak hs AVFRELQW EXIT «© ATTEMPTED AIVISINN BY FERN? E.? 
wAne SET AVERFLOW! PAITTTONS MEM OVERRIDE TF MEM ACTYVE E,? 
“fAww RESTORE MS(NPG) ~ FY? 
whens (THIS MIFRA ANAR MIST AF EVEN), F.? 
xAwnat F 2 
*AwINVAF GEN —=§ /NEITHNVAFS),7(°SAVFLY,SFL,TFO,100(TFSAVR), © “—_e..:!”*~=“‘ ‘ ; 3Owt*é<s=<i‘S; SSS 
nA CIL(ASGPRY,23 (PAD, L4(TRNBY ,15(LOGI,I7(CGPRNUT),24(RO F,2 


im 


de LA EA | A 995 HOURS 


=a = 


wAk % Eee 
Aw & RESTNRF LS(OP1) 9 JUMP TN CHECK SIGN THEN ExIT, F.2 : 
eA OO as a aaa 
w#AwIAVNF GEN AN(IDNVIOY, 11 (B&GPR),23(R9) , 140 TRNBY ,LSCLOGI, F.? 
wht 7 — CATFECGPRAUT) ,24(P1) Egt 
» oe -—  ee pei: * eee wee 
rin , F.2 | 
Aen SETIIP MS(NPY) FOR NTVISTON __ | _ Fe? sedge ee 
nha | | E,?2 | | | 
e£hAeDVORG? Fat F 2? 
2,5. ARG TOVSe4 ANJUST ORG TM ALLOW CAND aAannR, E,? 
#hAeINveQ GEN INC IPVOE19, 12 (BSGPRY,23(RB), —T4CTRNB) ,15°LNG),~ F,? 
aAw CI7T(GERNUT),24(R19 E,2 
WAw ORG? VORG2 sss RESTARE ORG ADNR sei ta sae AME agg ec a paca aga 
hue F.? 
zane SAVE LS (MPS) FOR LATER USE E,? 
__ Ae oe __ ee ; aeeeseeneeesie _.___._Fe2 
wARIPV9, GEN IN(INV22),11 CHSGPRI,23(R0D,L4(TRNB),1S(LNG), F.2 
she CI7(GPRNUT),24(8D9 F.2 
Awe Tee Ee .2 | 
. thee SETUP MSfOP9) FOR ATVISINN OO F.? 
eAnx E,? 
___ wAeINVI2 GEN — A NEUNV2 ST pI CB SGE Els PSCRB) LAC TRNAD,LSCLAGI, 2 
tAw CAF ECGPRAUT),24(RC) E,2 
Awe E,? 
__ shew —OMIVIME MS(NP1) BY MS(NP2) TO GET TRIAL QUOTIENT = Eg 
when!” —— —_ F.? 
#AwxIPv23 GMSK /POPAGFSM IV), LOCSTACKY, 16(PUSH), F.? 
Ae 7 CIS(PAGF4¢TNV94) ,LA3,TFO,SFO ee F.2 | 
ey ve ee | | | F.? 
wins SAVE REMAINDER F,2 
wAnn | F @ v4 ae oe 
wae TPV94) GEN IN(TAV259, 11 (REGPRI ,2P3FRO),L4CTRNBY,ISPLAG), | E,2 | 
eA CAI7Z(GPRAUT) ,24(RA) Cat 
cAws &,2 | 
tine SETUP AUNTTENT FAR MULTIPLY CHECK, OC —- E,2 
rAne E.? 
#AwINvesS GEN /N(1DV269,913(BS&GPR), 23(R1),14¢TRNBI,L5 (LAGI, | Ea? 
— wae © C97TEPRAUT),24°RC) — | a - 
shun F,? 
eAk st SETUP LS(NP{) FOR MILTTPLY E,2 sepenatinen wsintiondeeatae 
ae are e . I mn ee = nn 2 ae 


tAezIAVe6G GEN /N(IDVP79, I2CARSPEC), 22(AZERN) ,L407TRNAY,15(L 0G), E,? 


eS SE ee ee ee ee 
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ee 
Ae TSV27 
e As 
wAwn 
wher 
wAne 
wAalIPvea. 
wae 
wae 
wAkh 
wAwn 
kann 


wAn 

aAwnk 
what 
wAae 


wAweIAvSO GEN i=/TCINVEI,TAVS2I,SCTT),7CALt2Z9 = 


wher 
wAk % 
nAke 
wAeINval 
wAw 
thee 
“Aka 
whee 
wAks 
nhee 
w#AeweIAvso 
tAne 
RARG 
zAke 
wAeTOVSSA 
wAe 
wAhae 
tAkne 
— aheke 
*Aeaw 


© Aw 
wAke 
wAaee 


zhane _ 


ee Se ee 


ee 


wAaTAy29 — 


TF NAT EnuaL, SKTP SFCAND WNRD COMPARE 


~ GREATER? ITF PRONUCT NF TRIAL QUOTIENT AND LS(OP2) GREATER © 


_FLSE TRIAL QUOTIENT 18 ACCURATE, 


“RETURN TRIAL QUOTIENT AS RESILT 


wAeINvagr 


OB/12/75 EPSNUSCE VARTEY CAMSY FPPWCS ale) 905 HMURS 


C17 (GPROUT) ,24(RO) F 
GEN AN(IDVAEBI, FL CBSGPRI,23(RA) ,L4(TRYBY ,1SCLOAG), od 
_CI7(GPROUT),24(R1) _ E 


MUL TTPLY TRIAL QUOTIFNT AY LS(NPT 3 


| 
i 
| 
| i 
= ; ? 
Py 


“GBMSK /PPPAGESMIIL), LOCSTACK), 14 (PUSH), 
CIS(PAGF4¢TDV20),L83,TFO,8FO 


. 
= 


COMPARE MN&T STG WARN AF PROHUCT TR REMAINDER FRAM THE Ee 
NIVISIONG ae 
al 
Fe CR tS ee nN PPPS OT CEE ee LE CC Fe ne eS eT ane a eS, 
GEN IN(IPV3I0N ,12(ASGPR) ,24(RAL, 11 (RASGPR) ,23(R0O1, 


Ci4(StiBY, 16 CRVI),7CS#ALU) 


| 
| 
7 


COMPARE LEAST SIG WORD OF PRODUCT TO LSC(NPC) 


rare 
= 


GEN /N(TRVNZ1, 19CARGPR) ,24(RO),1I(RSFPM)+DN(RID, 
CI4(StUIBI,I6(CRV1),7°S4%AL 19 


| 
=» © 


THAN REMAITNOFRSLS(NP1), THEN TRIAL QUOTIENT ONF TON LARGE? 


ma ame 
= 


| 
” D mT 


eS se a 


REN /TFINVASA,TINVASBY, SCFTY,7 CALS) 


nt 
» © 


E, 
EF, 
GEN  —_s /NCTAV349, 11 (BSGPRI,23CRC),14(TRNBI,15(LNG),  € | 
CI7T(GPRNUT) ,2P4(R1) a | _ | F.? | | 
Ee 
RETURN TRIAL QUOTIENT m1 AS RESULT Ow, 
“ETAT S MICRA. ADDR MUST BE EVEN) 9 
F.2 
BEN /NCIAVSN4), 11 (CBSGPR) ,2SCRC),14(NECB1, 12CASSPEC), a | 
——EBSCATINES) , 17 (GPRAUY), O4(RT8 E,2 | 
F.? 
CLEAR MOST SYG WARN MF RESULT) EXIT TO STGN CHECKS, F,? 
LEA oe i al NAS A. ls A ii a, <E, se 
@ *- 


= = ae a 
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 #ARTOVEG GEN = SNFIAVIOY, 12CASSPEL),2AO(CAZERN) ,LACTRNAY,TS(LAGI, “E,? eS 
* Ax CIT PGPRONTY, 2P4cRN) F.? 

__wA*® FJFC a eS ee —_— 
khan Oe - —— E.? OO 
aha FIRST MICRA TINTOHNE TA NOURI E ANDSSUBTRACT 9 ref 
Awe SHTFTS LS(MPD) LEFT Te PREPAQATIAN FOR ANN /SUHY F,? _ __ 

ie Ae “USFS FYELO SELECT Th CHONSF ADA AR SIIRTRACT, oe EQ 7 
x“Akw F my ? 
#AeTAIRGE? Fl! * | SAVE PNSTTYON FE,2 

a7 2 ARR TMA a “BL ACE MTPRA YN FSEI fal CTT ap pers 
wAaeT Ast GEN JFETAS2), FSG, 2°71), 12 ARGPRI),24CPN), FL? 

_.__.*A® - CV4PTRNA),IS(LOR), UZ CGPRONTY ee 2 |e 
ait ARG TANRKG? RESTMRFE PINSITIAN F,2 
a Ak ws -.2 
eAkne anO LS WORNS OF MPFRANNDS 9 SAMPLE CARRY | F.2 
‘whens (THTS MICRNT ANDNR MIST RE FVER), : EE SSE BO 
wAkie FL? 

__ *AeLASe GEN — SJNETAS4) AP CASGPRLI,24(R1) LIC RSEPRI 6 2SCPD) » ec! ie ssticdaayh 
eae CI4PAPDY,17(GPROUTY,7(S$ALU) F.? 
ahue F.? 

___ wAwe SUBTRACT 1S WARNS OF OPERANDS? SAMPLE CARRY ee 

ee ne ee = a 
ahwTASs REM ANOCTASAD, (LAC ASGCPPLI ,AP4PRI1), 11 (RP BEEPR),2A(RD), F,? 

na WA® CI4(SUBI TA FCE V1) PAZ CGPROUTD 7 CSA ee Oe 
wAwn F.? 
ehnke SHTFT 1S RESILT RICKHT 4 Eat 

___ #Awt FIFLM SELECT JIMP Tr AnD OR SURTRAFT MS WORMS, ee ae see rere — 
k Ae * Be | | F.? 
aA MRR +2 RFI OC ATE IASA F.? 
Hae laga GEN —— /FFTASH),FSO, 9719, 12C7ASGPRR) ,24(P4),SH4, sc .lLCLULStti—‘COCOCsCSCOCOCOCOCOWC®# 
Ate | C1A(TRNAD INCL), L7(GPROIUTS F.? 
eAdeee Cat 
hen ANN MS WORDS? FNTTY STARFD CARRYY? SAMPLF MVERFLOW AND ALUP FeQ 
wAwen RETURN TN ROM, F.? 
wAwks (THTS MICRA ADNR MIST RE FVEN) Eas 
tAkne Eee 

ae 7. ARR e030 RACK UP TN EVEN PATR © Oo ee - 
eawewTASR REN /P(S8OM),SFO, TFO,LOCP IMP) ,GFA,L2(ARGPRY ,24tRO), F,2 
are CII (REGPRY,2937RC), 140409), CF1,17(GPROUTY Fy? 
see Sh a 2 enn * oa 
nAntk RSURTRACT “@ WORNS, “TTH STNRED CARRY: SAMPIE AVERFILMW ANT ALIFE? 
aha PETURN TA ROM, F,? 

cannes ca ae omnes sin are ana geen lee #15 
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wAwTASS& CEN /P(SS2”),SFO,TFO,LO(P IMP), GFA, 12(ASGPRI ,24°RO), a 
wAt CIT (ASGPRI,A3SFRO),14(°09UR) ,CFL,17(GPROUTS E,2 

Ae RG eg SP PAST REIORATEN TASQ@ - 
xe Ax FIFC e .? 
chee F 2? 
wAne COMPLEMENT OMURLE TNTEGER SUBRAUTINE 
eAwn | F.? 
wAwe = RO,RI CONTAINS INTFGER F,? 
RAwh | : pint ee pene oe paeponsncae 
eAee = = RA TS ANFS CAMPLFMFNTEN Th ACT AS SIGN FLAR, F.9 
ehh NUAS RECARAS STGH NF RA, F.2 
chexenenenean FE ,? 
eAks e.? 
eAwe OC MPFCK LEAST STG WORD 2 

Ae!” Fee 
zasIlmMP fe h INFTEMPL), 12 FASGPRY ,P4AFRID, LAC TRNAL ,L5(LNG),7C(SHALUD FLD 

es ne it ec i a a ga ees 
ahee TF LS ZERO, JUMP TA TWHIS COMPL MS) F.2 
aAws F.2 
SASICMP, GEN /TPICMPO,TCMPOY,SCFTY,7CALUZ) 
Ake | F.?2 
wAnkn TwN'S COMPLEMENT LS E,2 
eAnt a a 
wAeICMP2 GEN /NOTICMP3), 11 (BSGPR),23(R1),14(7CB), 16 (CRI), &.2 
As CISCASSPEC) ,SA2CAZFRN) ,L7C(GPRONTS ,2SarRrty °.2 
wage ee ee 

oe Ae CLFAR SIGN OF LS -.? 
nAae PF .? 
___ wAwICMPS GMSK  ——_/NC TEMP AD,S PFASGPRY  16(R1) LACLIT) ,15CKI BONO, | Fo 
wae CTATAND) 13 (OPRAUT) F.? 
eAwICMP4 GEN SN(ICMP51,1¢ (R&SPEC),23(NPR),14(TRNA),T5EL 9G), E,? 
eA C17 (GPROUT), 24acRid | : E,2 _ 
ey ora a a a ae ee AY eB BS see ns EP ee a 9 ka ee oe a a — eee 
h Aw ANFS COMPLEMENT MS F.2 
aAxs | F.? 
wAaTCyPS5 GEN  YJ/NEITEMPBD,12°ASGPRI,94(RA),  ....©™©»©»©»@§™©——— Feo 
© As CI4G(NNTA), 15 (1. 06),17 (GPROUT) Ee? 
kAws e.2 

whee —  ANFS CAMPLEMENY &TEN FLAG Rap SET BIINS pO | _ 
tA wt e.? 
#AKICKPR GEN /NCICMP7), 129 FASGPRI,24(RA),L4(NNTAD, ISCLAGI, Fee | sie 
Aa "BT YTEPRNUY) pwEL SOO ——e—e—e——— et s.:|:S”C*~wst‘COCOC™CSC™:COCs™CSCSO ees 


PARE 94 OR/12/75H EDSSNUPCE \VORTEY CAMBY FEPW.S ag 905 MOURS 
ee eee “< mame 
kA kx FYTT TO fALLER E,? 
e&Awk ee E.? 
— #ARTOMP7 GEN = 1OPSTALKY, 247 PAP.IMP),(83,TFO,SFO,BRO | a 2 °° CO 
wine Cet 
kAw* NECRFMENT MS TO GET TWNtS CAMP e 2 
oe Semen ee em mamemnteeeag geer mn 
sar NRK “+4 PLT TN EVEN LOCATION F.? 
tAwIChPQ GEN ANCICMP5),120ASGPRI, 24(RA),L4(MECAY, | ; Fee, ee 
whe CVF GPRALIT) a ae: ae —_—- 
At FIEC E,2 
___ BAW a acl ena th i ts tai pi Pk oe eget mors 
eAue SQlARE ROOT AND TNREYING CAMMON MIFERAS a F.? 
wAke EF 
when Fee 
then #4FHECK FOR SIGN RTT TIN TNAEY ADNRG OCU ca 6) iliac 
aAks TF SFT, LOOP AN THPD UNTIL REACH END OF TNH ANNR CHAIN, E.? 
aha ALSM SAVF ANNR NF MPFRANN | Oo 2 
wAwe TREN FTELL) SFLFCY Th EYTHER SHilaReE RANT NR TNNFx | -E,F 
k#Ake Ree 
che ARG TAR{ +} PLACF MICRA TN FYFELN SELECT TAALF E.2 pees 
— WARSOING GEN AS CSE1,SNINDD,SCFTY,7(MTOSS ,FS9,29(11» €,2 7 a 
x At CLL PRESPEP), 23(MTR), 1A(TRNAY, 15 °LNGY, 17 (GPRNUT), 24(RAY F.? 
_—._* Ae ne Ne eee ne es Bc Mcatacoces, eofiachcnteasieaca seine 2 
when FOLLOw INOYRECT ANPRESS CHAIN F.? 
wAkh F.? 
*#Aw ORR  ¥198R ss PL ACF TO ALLOW TEST ADDRESSING © Fe es ea ee 
— #AkSNIND GEN IN(SQINLY,ACMEMCY, LOCNFSMIR) Fa? 
x Aw FUJFC F,? 
: wAke scetsischcssssdiieneitasusisastesivetesee simeeiabedinicaatniaritl nese <ou:iiatiean tise Curae iis teisiaiaaaln sacs y ita tac rE A teint ela ne ioe etme 
kare SINGLE PRECISION FLOATING POINT SQUARE RAT F.? 
when F.2 
on AO VISES TABLE LOOKUP TH GET INITIAL GUESS, THEN PERFORMS = == =F? 
wAae Tw! TTFRATINNS THROICH Vos 1/2 (K/¥14 +¥1), Fe? 
whkn F .? 
Aw CALLING SENMUFNCES | Fee =e ticsonessisenlinmnedooteds 
SS  heeeaalnen eee * mmm 
cAue NATA 01408197 Gee 
a Awe MATA ANDR NE OPERAND Fe? ; i 
ae. sr aeiaienaaiaensaondmeneaesanaeiniintaeiaanes’ peeeieeememeaeaemeasiaieemanaiiiamaameaaanes te oe 
thane PESU| T RFTIIRNED TN aR REG, FF? 
rAws Fe? 
eee ~ PEGISTER USAGES 70000 TED | 


PACE 25 OR/{2/75 ESSNUPCF VORTEX CAMBY FPPWCS 00 906 HNURS 


ee Re a ee St ee ee 2s ——— = ee a rr rrr cr a me a me a ce ee ee ee as 


xAkY F € 2 
kAk® PO,RI «= TEMPORARY VALUESS FINAL RESULT P.? 
thaw BRO = LEFT JUSTIFIED OPERAND (WITHOUT EXPONENT), E22 
Aw t AA © FXPNNENT F.? 
raw RT = ¥1, TNTERMFDTATE RESIILT F.2 
whee PR TEMP, STMRAGES (CAYTE SWAPPING LISEN FOR SHTFT A)F,2 —_ 
kat F.? 
Aun F.?2 
tAee START FEYCH OF SECOND WNRD OF MPFRAND) CLEAR OVERFILOW, = =F oe 
Anke =«=§=THTS MICPEN MUST RE AN A 16 WORD RBOUNAARY TO ALLOW Tet a. 
Aw k fae 
ei RW IR ABO no ccc PO ON J 8 WORD BLOCK es 
whe SAy GEN IN( SQ], 1 O(NFSALHID, SB (MEMC) ,19(ASGPR),24(RB), FE,2 
eat CIACINCAD, LACCRYLI,7(ROVEL) | F.? 
the, ORG ee LEAVE ROMM FAR IMPS AND SOIND FD 
het r.? 
kAkn FIRST NAPFRANA WORD TN RBF SAMPLE F.? 
ig I a a a a a 
#AxSAD GEN JN(SQ39,11(BSSPEC),29(4IR),L4(°TRNBY,IS(LAG), F.9 
kAe CI7(GPROUT),24(RBY,7(SSALL) F.? 
thee PO A ae 
thee RESTART PIPELINE FOR FYIT TE NEGATIVE ¢ CLEAR RO, E.? 
Ake F.2 
_ RA®SOS GEN ST ESMA,SANVE)  SCFTI,7CALNS), TOCTESPI,ECMEME), Bc eemenenecaceeesncsortncoasecnamnanss nn 
whe | CISCINCP) ,19(ASSPEC), 22CATEROD, 14(TRNA),15(L06), E,? 
Aw C17 ¢GPRoUT), 24 (R09 F.2 
wAnn ieee mittee nae asco aeneccinrsaeniisenasctaces _ i Gg? 
whee SAVE SFOCOINA RPFRANA WORD TN RQ | F.? 
then F.? 
_ *#ARSAG GEN JN SAS) AL PBESPEC)  2NCMIR) L4(TRYBI, L5CLMGY, 
nA “C17 (GPROUT),24¢R9) —E,? 
whee E.2 
we Ans AVERFLOW EXIT = CAN'T TAKE RANT NF NEGATIVES CLEAR RO,R1, F,? 
+ 7 a eaeaaemeeees * meme 
#AxSONVE GEN IN(SQNVE1) ,12(ASSPFC), SP2FA7TERUI,147°7TRNAD,L5(LOG6), F.? 
At CA7(GPROUT), 2A(ROY,1OCIFSP) ,6(MEMC) , 7CSAVELY F.? 
~wAaSANVE, GEN ~~ JP (8SOM), FLO (BIMPY, SFO, YER, 12tASSPEY 1 DO CAZERMY, a 
Ate CI4(TRNA),LS(LOG),I7(CGPROUTY,24(R1) E.2 
wAwy E,? b. 
whee  £SAA ASAT TA FYPDNENT TA ABTAYN CARREFT ATAS AFYER SHYFT, F,? . 
chen E.? 
#AxSA5 CMSK JN(SQBV,12CASGPRI,LA(RAD,LICLIT) ,LSCXIAF7F), F.? 


i Dn i. oleae * aa 


se ee Og ee ee ee ee ee er a a ee mmm mn a a ee 


PAGE PR OR/I2/7% FOSNUPCFE VORTEX COMSY FPPWCS ae) QN6 HOURS 
; *#Ax* F @ ? 
At SAMPLE ANJIISTEN FXPONENT EVEN AR ONN a 
— so Na cc IO ET cay Ree nea So tes he cacacedl feat hoe sasiencsince RD es — Secu euees 
#AxSO6 EN ANOSQTV NIC RESPEC) ,23(NRGED , TA TRNAD FL SCILOGRD,ZEFSSALIY FL? 
wine F .? 
~ oA & % TRANSFFR EXPONENT (NPR LFFT BYTEY,TO R44,  ..}©=©)>©mRmQCLDBOU 
w#Akr : F.2 
#AXSN7 GEN JN(SNBY, 11 (RESPEC), 23(NLSE), FXP TO RGHT AYTE F,? 
aes VCH OCTRNAD TA CL OGY, LSCAPROUTS eee, ae ~ ——— =~ 
*AaxSOR REN JN(SNQ), 11 (R2SSPECY,23(9RLZ), FXP TH LFFY AYTE FLD 
wae CI4(TRNAY RCL NG) ,L7(GPROUTI,24fFRA) = i eee 
Awe | EA? 
eAet TRANSFER KRFST OF FIRST MP Wneh TA RA Fe? 
wAws 7 | F,? 
wha Sng GMSK Y/NEISNLA)D IAPCASHPR),LACRAI,VICLIT) pI SCXIFFAQN), | a 7 
*Aw CI4(ANNDI, VAL OPROAUT) E,? 
#Ae5Qyn REN JN(SO14),11(PSSPFCV,23TORL7Z),14(TRNA) ,15CL NGI, ¥,o . | 
a) painter 7 oC Grr = oo 
eA we E.? 
nAwn SETUP SECOND OP WhPh FAR COMRINATION WITH FIRST F.? 
a eR NEES bs Cc ee eee ae Net iast OOUES czet F een 
#anxSnis REN AR(BM19P) LPO CASGPRLI,24°RO),1A( TRNAS ,LSPLOAGIS, F 2 
the ENS COPRAUT) 
wane F.? 
h Att SHTFT RY & (WITH BYTE SWORD AND PUT RESLLT BACK YN RO F 2 
whee Ke? ener 
wARSN{D2 GEN = /NF8N13), 11 (RESPEC), F3(NRLI),14(°TRNA) ,V5(LAG), F,? 
wAk CAIZFGBPRIMNIT), 2A(RQY F.? 
hee a: 
Aan PIGHT JUSTIFY LEFT RAYTE TO STMIILATE A RIT SHIFT INTO NEXT WORNF,D 
Akh E.2 
eAxSO13 GEN /N(SQ14),19(RSSPFCY,F3(OLSF), F.? 
we Ae oO EVaPTRNR) TROL AR), A3(MPROUTY ns 
aAwe Eee 
with CUMBATNE FIRST NP KARD AND TOP MF SFCAND AP wR F.? 
whee TF EYPANENT WAS ANN, JUMP TN SKTP RIGHT SHIFT,  °»&;£E,2 7 
Ane FE .? 
#AeSA{4 GEN ATESO17, SOUR, SCTTY,7CALINS) ,120ASGPR) ,24fRAD, eer 
a ) \ a “ENT RESPER), ON(MRIFY 14(NR),I7(GPENIT) - F 2 
aAwwe F .? 
tAken SHTFT COMBTNFD FIRST OP WRN RTGHT ONE | | F.2 | 
theue (THTS MICRA ADAR MIST RE EVEN) SEL 
Aww E,2 


ee ee 2S ee ce es lh Ce el aii ee ee ss. an 


PAGE 27 QR/12/78% EPSNURCF VARTEX CIMNSY FPPWCS An 9N6 HNLURS 
ww ASAYR | OBEN "INO SOLA), 12(ASGPRRY,SHA,24(RA),L4(TRNA),15(L AG)» F.2 
ean CI7(GPROUT) F,? 
Ant gS gol i ha i a cease ne cate tah dete einen calle da ee 
wAkn SHYFT SECOND WARN MF CAMRINED OP RIGHT ONE? F,? 
whan SET RIT 15 FROM POPY AF FIRST YNRN TN NPR F.2 
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__ PAGE BB 0B/12/75 E2QSNURCE VORTEX CO __WSOTIME 01 {517 HOURS 
eREPLACE, 410 VS0OTIME SMR-572 03/13/75 SLIPSON E.,2 
ae SuUsk 33 RETURN ASBINARY a _ 
xAx SUB NAT 444 RETURN ABSBINARY E.2 : 
REPLACE, 414 VSOTIME SMR#572 03/13/75 SLIPSON E.2 : 
“Oe SUBI 19 ~— CHECK IF LESS THAN 31 DAYS _ ; 
Ar SUA OOATS +41 CHECK IF LESS TRAN 31 DAYS E.2 : 
eREPLACE, 416 VSOTIME SMR=572 03/13/75 SLIPSON E.2 
rie  _LOBI 9b ee ee ee a | 
x Ax LO8 LINE | Ree 
eREPL ACE, 428 VSOTIME ShR=5h72 03/13/75 SLIPSON E «2 
—*0e  SubL_ 1S CHECK 10 SEE IF IN BOUNOS FOR MONTHS — 
*aAxUDAT4 SubBI 13 CRECK TO SEE IF IN BOUNOS FOR MONTHS E.2 
eREPL ACE, 4352 VEQ0TIME SmMR#572 03/13/75 SLIPSON Eee 
_ *8De SUBT  U9 gee ecacasssasesnstete Acosessacseeucesis eemsneteacetnatndund-nieestuastnete-tathtnn adnate acu tnite 
KAXUOATS SUBI 1 Ee 
eREPLACE, 486, 487 VSOTIME SMRe572 03/13/75 SLIPSON E.2 ) 
abe IKE EVGA DUNE see ae etna sec oe | 
xf) IMP NOEV4a=j NO NEXT : 
eA IKNZ QDEV4={ DU NEXT IF NOT DONE E,2 : 
eREPLACE, 573,574 _...__VSOTIME SMReS72  OS/13/75 SLIPSON Es2 dt A 
—# De® TBA | 
ki* IAR 
Le nS Ll S|, ee E,2 spetarstdaicmeesele icin egg 
eREPLACE, 589 VSOTIME SmRaS72 03/13/75 SLIPSON E.2 = 
«Dv ANAT 0177400 | 
ae! 5, ||, n,n ee 
REPLACE,4561 VSOTIME SmR@-572 08/13/75 SLIPSON E.2 ; 
aD * HIV] $0 AZREMATDER, Be GQUUTIENT 
kAw O1V TEN —_—s_—————CABREMAINDER, BEQNUTIENT —_ E.e 
~ gREPLACE,7648 ~~ VSOTIME SMR=572 03/13/75 SLIPSON E,2 | 
& #ONUMG SuBT 020 0260 : 
ZA*c*UNUFMG SU6 BS4 0260 (8548020) E.2 
“@REPLACE,770 £8 ©€=£  —“‘ ;O#*®”! VL OTE ME RABID 0871875 USL IPSON E,2 
zD« Sun! 10 +t 
kAx Suk TEN 
~ SREPLACE,762,783 °° °&£.»V$OTIME © SHESETE —OS7TS7 7S SLPS 8 r 
«De JxZ ONUMEB ALL DIGITS CONVERTED TO 6COD | 
aD» JMP ONUMA | ak 
7 ee a a aaa aes Me kee ls ee oar | 
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eINSERT,716 MIVTIL NO SMR 02/03/75 KERNS F 
__*A __ wAKE Ba eieennerstreopesirrenscer tbh rcrnasinmctnmpesencinanenpenimtiantieistaneruncaeapesesnnisis nimnmrensinanenissuit manenttinne 
eREPLACE,2?328 MIUTIL NO SMk 01/31/75 KERNS F 
a [)* JmP *+4 
ee.) ee se ae i ee ee ee re Cee icusei tees F 
KA SUBI is! F 
* At Jaz INK6 IF ZERO BEFORE STURE FIELD VALUE F 
___wA® SUB I ip Sty Sl A ee een: ee 
«AY JAZ INH7 IF ON NOT ZERD BEFORE STORE FIELD VALUE F 
aA LoAé INKA F 
__ wAt IMP Lh CONTINUE PROCESSING 2. Fs 
oe INSERT, 2331 MIUTIL NQ SMR 01/31/75 KERNS F 
RAwINGS EQU Ey F 
_.____ eI NSERT,2369 | = MJUTTL .NU SMR O3/751/79 KERNS FOO 
k*Akx INHG LOKI MABUF RUM WORD ADUR F 
nA TZA F 
_ *AS STA ER aes 
x At STA 1,2 ENTIRE . 
x A * STA 292 ROM F 
“kA STA 3,2 AORD . | ae La _ 
WAXINH?  £JMP °£&(FLOCGE . . . ..}§©©PROCESS FIELD CHANGE UTRECTIVE ; *F 
eINSERT,2379% MJUTIL Nf} SMR 01/31/75 KERNS F 
___wA _EJEC eee 
Ann THIS IS A SUBROUTINE TO HANDLE Tre CHANGE CENTRAL CONTROL F 
eAne STORE BY FIELL SPECIFICATION F 
* & * le ae peut le dilettante lnc tk “ty el i eg ae lnm eS 
— wAwe hUCALLING SEQUENCE F 
zAk JiMP FLOCG , F 
nak SS ee ee Rear I en Herre eee ieee arte 
x AK ~ RETURNS TU SIMULATOR EXEC FOR PROCESSING UF NEXT DIRECTIVE F | 
wAkx Fe 
*AeFLOUCG EGU ke F 
wae “IMPM FETCH REE 
*ARFLUOS LRLA a F 
nA STA FLESN SAVE LEFT BYTE F 
~~ WAw ~~) 6 IMPS) PET CRA EEE 
KA ERA FLAOQ FURM 2 CHAR NAME F 
a AY STA FLUGO F 
a: lo * eee Sn ¢ | "26... Si.” SR Se 
KAKFLOLO LDA O,1 FIELI NAME F 
«At Jaz Fion tf END UF TABLE F _ 
- whe °° &4£-RA- “FELDS0 = —— See ee ee eS 
kA ® JAZ FLD20 If MATCH FOUND P 
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Aw IX F : 
nA IXR | _ | | F | | 
tAn XR ©. OO —_ ns 
xA® Jue FLOGIO CONTINUE SCAN THROUGH TABLE F 
eAeFLO20 EGU oe F 
aon) * ~ STX  &£FLO92 SAVE TABLE PURO ——  e 
wAx JMPM INA FETCH CHANGE VALUE F 
wAt DATA INE 7 _ F 
nA® | STxX FLOOS SAVE TERM CHAR Fr | / 7 
aA % STA FLOO! SaVe VALUE F 
Awe LOX .FLN92 FIELD TABLE PTR F 
kA LOB 1,X FIELO SIZE F . 
WA LOA FLO25 F 
— Am ANAT 07740 F 
nA t MERGE 031 | FORM RIGHT SHIFT F 
wAx STA FLO25 d 
_ she LA FLOSS) VALUE F 
“wARFLD2S LSRA 0 F 
aAt JAZ FLNSO If VALUE WITHIN BOUNDS F 
kane = = JMP FLO65 > RANGE ERRUR F ) 
—ieFLDS0 LA Le ORDER BIT POST POSEY EQN 
nA LSRA 4 F 
wAt CPA a 
a As ANAT 3 F | 8 | 
aA® ADDI MBLIF FETCH 16 BIT WORD AQOR P 
yt. «STA FLO9S Se oe F | | , 
w As LDA 2,x a 
As TAB F | 
Ae SUB 31 _CHECK IF IM FIELD __ _F 
zkAn Jaz FLOS5O YES, SPECIAL PROCESSING di 
* A % SuBI 13 CHECK IF FS FIELO if 
mA Jaz FLOSOA YES, SPECIAL PROCESSING | F | 
a) * ia |) ae NEYTTHER IM NOR FD, RESTORE VAL | 
kA ANA] 017 WORD DISPLACEMENT F 
xkAw TAB J 
nA “LGA FLOSS ~ ee ee nM Sey eG 
eA ANAT 07740 P eae 
wAx MERGE 03! F 
* Ax ~ STA FLOSS FORM LE Fr 
x At LUB 1,*X FIELD SIZE F 
aA® LoAE FLMSK,8 te MASK FOR FIELD SIZE F 
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HRY A WADA HRT 


FLOaO TF MORE CrRARS IN RECORD z 
JEXC1O = GET NEW OFRECTIVE F 


FETCHA FETCH NEXT CRAR F 


_— Ee eae ee 
F144 TF DISPLAY NEXT WORD F 
~ FLOOS  — CNNTINUE OIRECTIVE PROCESSING FOO 
* SPECIAL FPRUCESSING FOR FS FIELD F 
e SET FUR FS FTELO ROTATE | cteentinsesciveeneeaiiel NC seuss 
oa ia’? | ae ot ee LS TT 
* SPECTAL PRUCESSING FOR IM FIELD F 
02 — __ SeT FuR IM FIELD ROTATE F | 
va Ee eaeee oe me a a Ne nn a, 
FLOS1 FIELD FLAG F 
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16 SET UP LLRL INST | F 
OE chy I. il alin + A 


0 SET UP RESTURE ROTATE F 


a a a er eet See Sia Se es, ae 7 Se a es 


FULRE  — LLERL INST 


F | 
FLOQS CCS WORD SUB ADDR F ) 
ne 

POINT TO NEXT HIGH ORDER BITS F 
Chip MSB PURTIUN F | | 
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aAw ADD FLOQS CHANGE VALUE F 
#ARFLUS7Z LLERL Q RETURN FIELOS TO PROPER POSITION © F 
— wan STR &£O,X ns ae 
* Ax STA 1,% r 
a Ax JaP FLC3O CONTINUE FIELD PROCESSING F 
ae oe i a E. ne in ee 
WA*FLLEREL LURE 0 LLRL INSTRUCTION BASE VALUE F 
WARFLD9O MATA OO hLLhhLUCUFEL DD NAME _ F 
~ WAWFLOSY ODATA QQ | NEW FIELD VALUE | eo 
WAwxFLODG2 DaTAa 0 NAMt TABLE POINTER F 
—wWARFLOGS OATA GO TERM CHAR sss ee: 
#A*eFLO9@ DATA ) | ° _ F 
RAWFLD9OS DATA 0 ROM WURG SUBCOMP ADDR F 
a Ah & F 
~ WASFLDGO CALL  £SICUT,3,FLER1 OUTPUT FIELD NAME ERRUR  — — F- 
nA JmP ExC49 TRY AGAIN F 
WAWFLOSGS CALL  SIGUT,3,FLERK2 OUTPUT FIELD RANGE ERROR a 
Aw SMP  -EXCIO TRY AGAIN | F 
WARXFLERY DATA ' MmuUL6! F 
*AWFLER2 DATA ' Mmut7! F 
eg ee ere eee See re aici 
tAxe FIELD NAME TABLE ij 
KAR 3 wORD ENTRY sspeuidiaciedaictis F 
KAKK 122 CHAR NAME F 
sAne 2@eFIELD SIZE F 
wAke ee _38LOw URDER BIT POSITION oo ee F 
rane , - 
KAWFILNAM EQUI * F 
naw _ VATA PAA, AO F 
nAw OATA 'sB!',4,4 F 
eae DATA 'SH',3,8 F 
nar DATA tXF',2e31 | _ F a | 
eae  4YATA £(wF!,3,13 © a, ae 
*An DATA 'ye! 19,14 F 
a At DATA 'SC',1,19 F 
~ wan °»+OATA °&£(‘WREYT,16 | ones nn ie 
* At NATA 'CF',2,17 3 : 
ht At DATA 'MF',1,19 F | 2 
ar 7 \ mma yh © nn 0° “PY — eee ee 
nAr DATA 'RF',3,24 F 
kAw NATA LA'T,2,27 3 
SI = 
kA* DATA 'IM!,4,31 F 
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A DATA 'aR',2,39 F 
Aw DATA PMR, 1,37 Sa ee ee ae ee ee 
a ee). sy ann Ler : : F . 
* Aw DATA 'SF',2,42 F 
«Ax MATA '1F9,2,44 F | 
kA DATA 'FS', 4,46 — OS rs 7 —_ 
cAx DATA ™T',14,50 F 
x Aw DATA 'mS',4,51 F | 
Aw ATA TREY, 5,55 RR ESE — 
kAx DATA '1S',4,69 F 
aA OAT A a END f)F TABLE F 
ay Tr" eS. ninena edie sas ce nest Nes ssa wii oe aia -—_- 
wKWAwFLESK EWU x FTT MASK TABLE F 
x Ax DATA 2 F 
ee Nev A — ae : — EE 
aA x DATA 0% F 
kA * DATA ‘y/ F 
a ae \ aa - _— 7 r . reo is i 
zkAx MATA 57 F 
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eINSERT,6A1 VSJICP SMR#499 09/20/74 NEWDORF ae | 
wWAXJCPRE LOA  VatCa- CALCULATE CHAR ADDRESS OF LAST + } Eel . 
mAs Any 40 CHAR IN JG BUF E,i | 
nA LALA | AND STORE TT Eel 
Ate STA BLFL TM INTO BHFLIM, __. E.i | | 
wan L068 CHPTR SAVE GCHPTR IN SAVECP, Eel a —_ in 
wAnx STb SAVECP ae | 
ae Fates ten Saag decease eee peg Eel 
xAx “ERA CHP TR IS CHPTR AT END OF BUFFER? E.i —_ | 
nA* JAZ JCL ARS IF YES, JUMP TO END OF ROUTINE, E.1i : 
_ wAw CLA CORPERPTRUU©=©€™—™—™CCCUWHEN PERPTR TS ZERO, WE SCAN FOR "2" E,d 2 
*Aw JAZ JCLABL IF NOT, WE ALREADY KNOW WHERE "," YS, E.i 
WAN STA CrHPTR E.! 
a eee aera ee. Se ee es 
«Ax STA PERPTR REINITIALIZE PERPTR, _ Eel 
wAwJCLAB1 JSR JCGTCH,X IS NEXT CHAR A PERIOD? El 
wAt _ SUB _ N@560 ee | — E.t 
w#Atw JANZ JCLAB4 Ik NOT, JUMP E.} 
wAx Lia BUFL IM CALCULATE LAST WORD ADORESS OF Eel 
kAw —LSRA 1 __JCB AND STORE ee | E.i | | 
kA % NAR | | Eel _ 
kAx STA KUFLI™ IT HACK [NTO BUFLIM E.} 
a Ar LUx = NL2@024 TwO SPACES, E,! 
wA® LOR | $CHPIK Ei 
nAw DAR Eel 
«A * T er A a | E e i | ! 
xAR [Ske 1 COMPUTE KORD ADORESS, ~ Ef | 7 4 
kAw RT RAOSHO, JCLAB2 JS PERIOU IN LEFT BYTE? E.i 3 
wAx LIA 0,8 Nie | Ei _ : 
*A® a) Cee aT" ~ REPLACE PERIOD BY E.! | : 
WAX OKAL 0240 A BLANK, Eel 7 
ke Ax STA 0,8 STORE BACK INTO JCB, FE. | 
~ wAnw  JMP . i |.) —— _ | —— Eel | | | 
zxAxJCLAH2 STX 0,8 STORE BLANKS INTO JCB, Eel 
KAxJCLABS TBA Fed 
“eke SUR” MRR FL YM) ”—~™~”CARRE: OWE OAT OEND OOF BUFFERS (70g 
kK Ax JAZ JCLABS IF YES, JUMP TO JCLABS, Ei 
eAx IBR If NOT, INCREMENT B AND LUDP, Ei 
RAMP CT BR ee ~ Eel 
eAwJCLAH4 LDA CHPTR THIS CHAR NUT A PERIOO, E,} 
wat SUR BUFLIM E,1 Gs 
tix  ~” JANT ‘JCLABi-  =—— a TK AYO NENT CHAR, 0000 
*tAxJCLABS LDA SAVECP RESTORE CnretrR, Ei 
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KAx STA CHETR ap | 
eREPLACE, 662 VeJCP SMR=eAQG 09/20/74 NEWDORF E.1 
SNE ICERE: “CORT JCB RT ne 
wAx Lue JCPRE E,1 
eINSERT,664 VtJCP SMR e@AQD 09/20/74 NEWDORF ie | 
— wAXBUFLIM OaATA QO  — STORES END OF JCB, es —. a ——o 
*#A*SAVECP DATA y SAVES CHPTR WHILE WE LOUK FOR PERIOD Fat 
e INSERT, 687 VEJCP Nu SMR 92/25/75 KERNS E.2 
WAR LOA FIVE ee ie 
xA® JSR JCLNDV,X GET OST ETRY ADOR Eee 
a Ak Tan ee | F.2 
eA * ~ pbk 498 MEVICE NAME  }©§©——— a - _ ee 
*Ax LSRA | E.e 
Arn SRE  — NS04,7,010 TS $0 AN RMD © = 1 
nAk JMP JCP Y TF NOT AN Rel E.2 
wAx O8 JCF CRS4+3 LOFCRS AY)OR Eee 
kA Lia 3,4 E.2 
Ax NAR — = ne 7 eee le 
aA* JAN JCP 4 IF FILE NUT OPEN, Du NOT CLOSE E.2 
kAx ST “+5 STORE FCB ADDR IN CALL. Es? 
— Rak 6M FLLGOSE on LG,0,1 CLOSE TAY FILE wIiTe wALT/UPDATE ee 
wAx JCF) Eau Ese 
wAk LwA sun ew Ki) _ E.2 
eAxn  ©}©6 Jd SR SCLNOV,X 8 8=©=©=—CSTA ET OST ENTRY ACHR”  —CCC—~——”——UTT EQ 
kA Ta E ry 2 
kA Lia Lyf DEVICE NAME E,2 
— wAew 4LSRA &.. ee eee a ” ee AR 
* At SKE N504,7,010 1S #80 AN RML Eee 
A ® Jer JCP2 | TF_NOT AN RO Eg A 
tAx  »4LOo  °£JCFERS45 ~BOFCR AODR E.2 
wAx LOA 3,8 E.2 
kA DAR E,2 
a? \ ae Jan  #\CRPE “TF PILE SUT OPEN 00 EGR 
aA ST# *+5 STORE FCR AUDR IN CaLL E.2 
x AX CLUSE RKUFCR,7,9,1 CLOSE 'hO!t FILE wiTr wALT/UPDATE | E.2 <scaiiagiecteaaciaigg Oa 
=. i) a ee ” mene 


eREPLACE ,&96 VSJCP SuR eB OS 02/24/75 NEWDORF' €E,2 
xD % SU5 NINE NUMBER | a -_ 
wAX ““SuK ~~” "YEn °°» °””°”°»°;»~RUMBER  ©6@©@®©@©UDDOOO———ET ee 
eREPLACE, 496 VbICP Sah eBOS 02/24/75 MNEWDORF E,.2 
we Suh EIGHT 
ee > e~€ aia - ae 
e INSERT,942 VBJICP Ni) SMR KERNS E<2 


3S a eee a SEE eee ee ee ee Se: TS 
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| kAwe THE A REG MUST BE ZERO AT THE TIME OF THE SCHED REQ eREQGUIRED BY 


_ *AR® VSORT*@® _E,2 | : 
»REPLACE, 1286 VeICP SMR@754 02/26/75 KERNS E -_ = 

xs LUOAE JCFCRS,4 PICKUP ADDRESS UF APPROPRIATE 
wAe® LD AE CSC RCRS@2,8 PICKUP ADOR OF APPRUPRTATE __E 
pp INSERT, 1776& V&EJICP SMRe 499 09/20/74 NEWDORF E 
zAx LDA CReETR SAVE POSITION OF E 
_ wAe DAR __ PERIOD IN JC BUFFER E 
eAew STA PERPT IN PERPTR, ~ 
, INSER1,1785 VSJCP SMReA499 09/20/74 NEWDORF 
__*A®PERPTR DATA 0 _ SAVES CHPTR TO PERTON IN JCB, 


ee Ss ss = ee 8 ee ee 


= a 


— a me ee ee oo 0_— SS = — —_— 7 — Ciel — eee ee _—- ooo = 7 a ee = 7 Se a ———_— ee Se ee ee 
a ed ae ee ee ee eee =. Sm am am mm a a 8 ee eee 
a Se Se ila tiniliemal ee ee es + ee oe all = SS Oe ee a me SR ER er ee —— 
oe ee ee ee ee _ a = — So _— eae ee = ee 
(ees Fie, _— = ——— ee Ee _—— ee — = a ee 
| 
| —<—<—<—<— —— a. ~~ ——] er — ee oe =. 2m = ei 
| 
| 
rm nm mm ee ee ee ce ee ee ee ee eee 
em ee ee ee — = — ————— om —— = ew el a ae ee 
aT ae ee —_———— —_ — ———— 2 Se ee ~ e e e  e 
| 
=——- oe. ro = — « mame mm mm eee ee ee ee ee ee ee - 
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_ PAGE 20 O8/12/75 EASCURCE VORTEX COMSY = __VSFMAIN 04 __ 1925 HOURS 
eREPLACE, 1024 VF MAIN SMR#732 11/08/74 NEWDORF Esl 
«()® JmP FMORX | 
zsAn  JMP  FwtRXYD © ees | ee 
eREPIL ACE, 1189 VGSFMAIN SMR=7 32 11/08/74 NEWDORF €,] 
kOe ss LLIYA FMCRER LOAD A WITH ERRUR FLAG AT EXIT | | — 
— wWARFMCRX2 LUA FeCREFF LOAD A WITH ERROR FLAG .......}©G& ed an 
eREPLACE, 1261 VSFMAIN SMRe732 11/08/74 NEWDORF Eg! 
RO SMP PMUEX 
— a5 ;  _— | -_—_—_—_—_——_—emeee 
eREPLACE,142¢ VaFMAIN SmRe7 32 11/08/74 NEWDORF €,1 
wD SRO FL x es OS ee 
RAXFMDEX2 JSR Feir,x LINE FEED LO a 
eREPLACE,1432 FMAIN SMRoe732 05/14/75 KERNS Eee 
w [jx JP FrlexX 
— ae oo “oe sanneniennimnnianmniniatmieaiiiasmeaiieeimeaiimaais = ‘mmsabeammmiaiin 
eREPLACE,1582 VbSFMAIN SMR=732 11/08/74 NEWDORF Eel 
oll JmP _ PMENX ee ee ee ee ee eee ee ee ee 
oa “eae 7 
eREPLACE, 1670 VSFMAIN SMR#732 11/08/74 NEWDORF' €E,1 
aD® LA PMENEF MAD A WITH ERROR FLAG — Seante tees uence 
~ WARFMENX? LOA  £FMENEP LUA A wITh ERROR FLAG : 1 
eREPLACE,2401 VSFRAIN Sak=732 11/08/74 NEWDORF ei 
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eREPLACE, 2514 VSFMAIN SmR#732 11/08/74 NEWDORF €E,1 
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e INSERT, 2843 VSFMAIN Nu SMR 02/25/75 KERNS E.2 
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rA® Lia SwOH, X GET SWITCH F 
Aw BT RA149, #64 SKIP WRITE IF FILE OF TAGS FF | : 
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nA JMP COSA TARGET BYTE 0, SOURCE BYTE 1 F 
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ow Ae “IMP SUA 0——™~”CFAARGET BYTE 2, SNURCE AYTE i es —_ 
» INSERT, 1556 VSORTY 06/25/75 MENG F 
__ wAKK _ ALGEBRAIC compan ee eee ee oe oe 
*ARCOSOA LODAEN Tw, X GET TARGET wORD F 
x Aw FRAE* Sn ,Xx EUR SQURCE wORD F 
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wAWTWSIN LDAE®  #£Tw,X ©GET TARGET rKORD AGAIN en 3 
wAt JAP CRIL F 
_ wA® JmP CRTG en __ _ RO eee 
*AXCOSIA LOAE® Sw,X GET SOURCE wORD *F | 
RAw LRLA A RIGHT BYTE F 
wAt ERAEw® Tw,X __EOR TARGET WORD F | Ea 
wAw JAP COS SAME SIGN a ee 
zAt® JMP TwSIN F 
WARCISOA LUAE® TweX GET TARGET WORD | 7 F q 
*&An LRLA 8 RIGHT BYTE F 
zAt ERAE® Sw,X ENR SOURCE wORD F 
Ak JAP C1$0 SAME SIGN | - = F 
RAS L DAEs Sw, X ~~ GET SQURCE wORD | F 
kA JAP CRTG F 
* Aw JMP ss CRTL eae ; 
~ wARCiSta LOAEs  Tw,Xx GET TARGET wORD F 
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eAw TZ5 INITIALIZE FOR LOW VALUES F 
~INSERT,395 VSORT2 07/03/74 MENG E ot 
x AY JMP Mm SSFI} SORT ANG WRITE LAST SEGUENCE ee | 
— es INSERT, 39%  — — VSORT?2 “40/24/74 MENG  €E,i 
KAWREDP } Lia SHEL, xX PREPARE Th PAD ENTIRE BUFFER ee | 
KA ek ee re en: 2. | 
wae ~=——CSLCYBT XSF 4 Eei 
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a Aw LUBI XSF 2 _ PLUS _*F 
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wAx Su SFTK, x MINUS SECUENCES REQUIRED F 
kAk JANZ SRFOT+> = ALD MORE SEQUENCES IF REQUIRED _E,1 
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aD ® JMPM SSEQ SORT AND WRITE LAST SEWUENCE 
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»REPLACE,657,658 ‘VSORT? 07/08/74 MENG Fs 
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Ak Jue ~$Sti EXCHANGE REQUIRED ap | 
eREPLACE, 4663 VSORT2 07/08/74 MENG Est 
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Aw JAP $5813 YES, GET READY FOR NEXT PASS ~ ; E,t 
»REPLACE, 665,668 VSORT2 07/08/74 MENG E,! 
*0*S812 LOA SSL0 GET PTR TO LOW RECORD 
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*D JAZ $§13 TF SAME, DUN'TT EXCHANGE 
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